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PROCOMMAND, c est la 

bo?te a outils du 
programmeur 8 bits, sur 
Applelle, lie, llGS. 

ProCommand. cest un 
ensemble de modules 
coherent pour enrichir 1g 
Basic, et simplifier ia 
realisation des logiciels. 

Un Basic enrichi. Print 

UiL D(t»it; eiiiiciii. ri ml 

formate. Type, Date, Tri, 
Rnd. formatage 
scientifique. Input formate. 
Clock, Hexdec, Pop. 

De nouuelies 
commandes disques, 

Online. Dump, Copy, 
Format. Eject. Setinfo, 
Path, Compare, Paste. 

De nouvelles 

commandes utilitaires. 

Varlst. Vartrc. Renumber, 
Hold. Merge. XRef, 

Des commandes 
d'edition. Find, Edit. 
Auto. Macro. Lyst, Onekey. 

De puissantes commandes 
graphiques Dhgr. &hgr, 
&hgr2. &hcolor=. &hplot. 
Stplot. &draw. &xdraw. 
&fill, Scprint. hload. hsave. 

Des commandes souris, 

&int. &let. Ststore at. &pos, 
&wait. &Gnd. 

Et pour aller plus loin, une 
documentation en frangais 
precisant te protocols a 
respecter pour integrer vos 
propres modules a 
ProCommand. 

ProCommand en 

"^""'- '^ 5.25" ou 3.5". 500 F 
{tarifabonnes: 450.00 F). 
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En couverture 

Apres de multiples programmes de transmission de donnSes entre Apple II, 
Macintosh, IBM ei Minitel, voici la prdsentation de programmes en shareware tout 
k fait ^tonnants : la recuperation d'images super-haute resolution entre Apple IIGS 
et Macintosh II... 
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Com.^1.0 pour 

JlppCe // 

La disquette 'communication* que nous vous 
proposons aujourd'hui a ete con^ue par 
Dominique Ottello, auteur de programmes 
parus dans Pom's et animateur de la Cite 
Apple U de CalvaCom. Un bonheur n'arrivant 
jamais scul, une deuxieme disquette dont on 
vous devoile le contenu dans ces lignes, est 
livree avec... 



Com. V 1.0 



La disqueite Com.V.01 (uniquemenl en formal 3.5") regroupe un 
ensemble de programmes ci fichicrs pcrmeiiani la communication, 
particiiliiremcnt avec CalvaCom, mais pas uniqucmcnL En voici Ic 
ddtail : 

Blu Programme de compactage ei dficompactage d'une grande 
panie dcs programmes de la biblioihfique Apple II. Ce programme esi 
accompagnS d'une documeniaiion en anglais. Pour tous Ics Apple //. 

Bib. Lists 11 s'agil de la Usie des prograrruncs de la biblio- 
ihfique de la cil^ Apple II sur Calvacom. 

IIGS.Minitel 11 s'agit de la configuration du tableau dc 
bord (Modem) dans Ic cas d 'utilisation du IIGS avec cable Miniicl, 
plus un ensemble de questions CI rSponses divcrses sur I'uiilisation du 
llGScl de VSCom. 

Kermit Ce logiciel de communicarion, un classique, permei h 
I'aide d'un Miniiei relifi A I'Apple II de t^lfichaiger dcs programmes 
(plus de 600 soni dispoiiibles sur Calvacom). Une documentation en 
anglais accompagne ce soft dotiS de nombreux drivers : modem 
\uxigT& IIGS, Hayes Micromodem, cartes AppleCom, CCS770, 
Proraoihcus, Super S£ric ct Apple lie, Microtek SV622, Pour lous les 
Apple//. 

Pile HyperStudio n s'agll d'une prcsemalion des 
possibililSs, tarifs, moyens d'acc&s de Calvacom. El pour ceux qui 
n'auraieni pas HyperStudio, une version simplifife en est livree sur le 
mcme disque. Pour GS, bien siir. 

Shrinkit La demlSre version de ce programme de 
compactage el dficompaciage de fichiers et disqueties. n esi plus 
pcrformani que BLU el permci de compacier des disqueues endfires 
qui ne sont pas au formal ProDOS standard. Pour lous Ics Apple //, 
documentation en anglais. 

Talk Is Cheap Ce programme de communication 



fonctionnanl sur lous les Apple II avec sa documeniation en anglais 
est doifi d'un sysiime de tnacro-commandes. En plus de I'Apple //, 
TIC permet d'imuler les lerminaux DataMcdia. VT52. Heath.H19, 
Hazelrine.lSlO. IBM3101, ADM.3A, Dow Jones, Soroc, m912, 
ADM.31. Hazelline.1500, Adds Regenl, Viewpoint, Tandy Laptop. 
Pour tousles Apple//. 

T6l6phOne Quelqucs deiails concemani Ic cSblage de la 
prise telephoniquc ami5ricaine el de son tiomologue fran^aise ainsi 
que des informaiions en anglais sur les procddures dc uSlcchargemeni 
avec protocolc Xmodem ou Ymodcm. 



Et Plus. . . 



Le deuxifcme disque 3,5" qui vous sera livrfie comporte : 

Bram Test cet anti-virus est k meitre dans ie repertoire 
Sysiem.Seiup- Au premier dcmarragc. il crie un fichicr donnani 
I'lmage de la Bram. Lors des ddmarrages suivants, il compare cc 
fichier avec le contenu de la Bram ct prfvient des ^venluelles 
modifications. D est alors possible de resiilueric contenu du fichier en 
Bram ou de sauvcgatder le nouveau contenu dans le fichier. 

Boot Modif FutS, cc fichier csi k mctire A la place du 
fichier PiuDOS du rdperloirc principal du disque dur ; lors du 
demanagc, en appuyani sur la pommc, vous pourrez choisir Ic 
pcriphdrique ^ aciivcr : disque dur, disquette, Rom ou Ram 

Init 'Master Ce Cdev csta metire dans /Syslcm/CDevs : il 
permei de validcr ou dfvalidcr les TIF, PIF, NDA et CDA qui scroni 
charges lors du dcmairagc. On y accede par le NDA Control-Panel. 

TranSWarp Un auuc Cdcv qui controlc les vitesse ci IRQ 
de la Transwarp dcpuis le NDA Conmsl-Panel. 

FaZ II File Aiiribuie Zapper V 2.6 pemiei d*6diier les altributs 
de fichiers. le bil dc backup par exemplc. Tous les sources de la 
version 2.4 en Merlin 16 accompagncnl cct utilitaire Ocs differences 
enire 2,4 ct 2,fi sc siiuent uniquemenl au niveau du tableau de 
denomination des types de fichiers. La documeniaiion est fournie 
^galemeni Pour tous les Apple // 

One Arm Battle Un peu de d^Iassement avec ce jeu de 
machine A sous sonore ci parlant anglais. Une beile application GS. 

Utilitaires texte 

ImprimcTXT, pour I'impression de lout fichier TXT avec lout un 
las de paramSlTcs pour I 'Image Writer. Pour GS. 
Binscii, conversion de fichier ProDOS en TXT el vice-versa. Pour 
lous Ics Apple//. 

File-Chopper. pour sdparer un gros fichicr en plusieurs plus peats. 

Urile pour fichicrs TXT irop longs pour ctre chargfis en une sculc 

parlie dans un iraitemcni de lexie. Pour tous les Apple //. 

Tex qui, entre auties, fail I'invcrse du prdcidenl c'esi-3-dire. met bout 

i bout, en un scul fichier, plusieurs fichiers TXT. 

Pour lous les Apple //. 
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Dans ce numero d'^te, Emile Schwarz nous presente I'art et la 
maniere de transferer des images en couleurs depui's T Apple IlGS 
vers le Macintosh 11, et reciproquement. Vous aurez maintenant 
le necessaire pour travailler vos ceuvres imperissablcs sur Tune et 
Tautre machine. Et, si vous aimez programmer sur cetle mer- 
veilleuse machine qu'est le IlGS, Patrick Desnoues vous a concocte 
quelques outils dont vous appr^cierez vite I'aide precieuse. 

Si vous etes plutof un utilisateur qui aime avant tout !a transpa- 
rence de rinterface du GS, alors profitez de deux CD A, Format et 
Eraser, dont la simpliciteet Tefflcacit^ est tout a Phonneur de leur 
jeune auteur. 

Cote Mac, des bancs d'essais, et de Phumour avec Fortune, une 
astucieuse adaptation en Pascal pour une Tnit qui vous reserve 
quelques kilo-octets de surprises ; une Affaire a suivre... 

Puisque I'epoque est au changemeni. Pom's ne Tait pas exception. 
Christian Piard, auteur et redacteur depuis de nombreuses 
annees, part exercer ses talents dans le sud de la France. Du soleil 
malgre cela dans ce numero puisque Marylene Delbourg Delphis, 
interviewee par Ariel Sebban, nous li vre ses impressions en direct. 

Le meilleur pour la fin bien sur, avec la nouvelle rubrique des 
news Apple // preparee par Rene- Jean Anderson : Applemania. 
Quel bel ete... 

Herve Thiriez 
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Qestion (kficfiiers 




% -J7- SincCtrson 

Dans notre precedent article, nous avons 
longuement etudie un sysleme structure 
de gestion de fichiers. Pour pouvoir 
profiler de certains automatismes 
procures par ce systeme structure, nous 
avons vu qu'il etait necessaire de 
conserver des valeurs essentielles dans le 
premier enregistrement du fichier de 
rang z^ro, celui que nous avons appele, 
par simplification, "record-zero". 

Dans I'exetnple du fichier des dictons, application de base, 
nous avions uUlis£ uois variatiles num^riques : le nombre 
nous avions utilise trois vanatjles numcnques : le nombre 
d'enregistrements, la longueur de !a ci6 el la longueur de 
renregistremenL Nous revenons aujourd'hui sur ces valeurs 
essentielles pour proposer une solution au probl&me que 
peut poser leur maintenance et rfigler en meme temps 
quelques questions annexes pour ne plus avoir d y revenir. 



avoir un risque de dfibordement de I'enregisirement r&ta sur 
I 'enregistrement un. Rappelons que nous uavaillons avec 
des enregistrcmcnts de longueur fixe. 
Enregisirer des nombres sans avoir ddfini dans quelles 
"plages" ces nombres peuvent varier ne va pas, non plus, 
dans le sens d'une rationalisation des choses. Une autre 
contraime conceme les techniques d'indexation que nous 
mettrons ultfirieurement en ceuvre sur nos fichiers. La 
encore, nous serons appelfis & conserver des valeurs es- 
sentielles dans le record-z^ro. 

On congoit, dfes lors, qu'il devient Irfes utile de disposer d'un 
"outil" adaptfi pour rdsoudre ces problfemes. C'est cet outil 
que nous proposons aujourd'hui sous forme du programme 
MNTR2ER0 (MatNTcnance des Record-ZERO) rfialisant une 
gestion complete du record-z^ro. Ce programme rcprend, 
bien entendu, la philosophic du syst&mc structure. Le 
Iccieur, s'il a &tadi6 Tapplicaiion de base constitute par la 
gestion du fichier des dictons, se retrouvera sans difficultfi 
gestion au ucnier acs oicions, se retrouvera srfm uHiici/iuj 
dans le programme mntrzero qui permel de crfer des 
fichiers adaptfc au systfeme structure mais aussi de revenir 
sur les fichiers exisianis pour restaurer des valeurs diStruiles, 
pour en modifier d'aulres ou pour dtendre le fichier par 
cxemple en lui d^finissant un nouvel index. 



Au commencement... Mettre a I'index 



Le simple fait que des variables doivent fiire prfeentcs dans 

I'enregistremeiii zlro, avant cic metife en roiite le 
programme de Mlse ^ Jour, induil tout de suite I'idSe que 
le fichier doit 6tre crte de facon ind^pendante. C'est 
d'aillcurs ce que nous avions fait dans I'applicaiion de base 

programme qui rtalisait done deux choses : creation du 
fichier et enregistrement de valeurs dans le record-z6ro. 

Une iwemifere observation ddcoulant de celte op6raiion est 
qu'il est Evident que les variables enregistr^es vont prendre 
plus ou moins de place selon les valeurs conienues i 
i'origine appel^s h ivoluer. Si nous nous contentons 
d'enregistrer des valeurs au gr€ de notre faniaisie ou de nos 
besoins, il nous sera impossible de dtfinir certaines auu'es 
valeurs, par exemple la plus petite longueur d'enre- 
gisirement possible poiu' les fichiers ii gfirer. En effet, si la 
longueur d 'enregistrement d^clarSe est rdduite, il peut y 



Pour mieux comprendre la portfe du programme, au niveau 

du record-zero, en ce qui conceme 1 mdexahon, disons tout 
dc suite quelques mots h ce sujet Une indexation, dans sa 
forme la plus simple, consiste k r^aliser un index ^ partir 
d'une zone ddfinie sur les enregistrements du fichier de 

programme{s) pour acc&ler aux donn£es scion la s&iuence 
foumie par cet index. La zone k indexer doit, bien entendu, 
fitre loujours au m5me endroii relatif sur chaque 
enregistrement. Prenons un exemple concret : 

Nous disposons d'un fichier d'adresses et nous voulons 
indexer ce fichier sur le nom des personnes qu'il coniieni. 
Pour mener ^ bien cette tSche, nous avons bcsoin de 
connaitre au moins trois valeurs indispensables : 

>■ le rang, sur Tenregistrement, du premier octet de la zone 
"nom" ; 
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>- la longueur de cette zone "nom" ; 

>■ le nombre de posies nfcessaires pour contenir I'index 
4iant entendu que nous g6nSrons, fondamentalement, 
UN poste pour UN enregislrement. 

Ce sont ces valeure que nous enregistrerons dans le record- 
z6ro des fichiers qui seront indexes. En pratique, le 
programme propos6 est pr€vu pour enregistrcr les valeurs de 
deuA index diff^rents sur le mdme fichier de donn^es. Disons 
bien qu'ici. un index est. physiquemeni, un fichier 
indSpendant du fichier des donnSes, bien qu'il lui soil 
raltachd en ce qui conceme la gestion des donnfies. Les 
valeurs essentielles d'un index sont cnrcgistrfes dans le 
record-zSro du fichier des donnas et non dans celui de 
I'index. 

II est ^galement n6cessaire de connaitre d'auUes valeurs. 
Citons les noms des index se rapportant k un fichier de 
donn^es. Pour simplificr et raiionnaiiser notre systfeme, 
nous utilisons simplcment les dispositions suivantes : 

>- Le nom d'un fichier de donndes ne peut exc&ler aetiT 
caractferes, 

y- Le nom d'un index est obtenu en suffixant le nom du 
fichier par "xi" pour le premier Index el par "x2" pour 
le second. 

Autrcmcni dit, un fichier client peui avoir clientxi 
comme premier index ct clientx2 comme dcuxiftmc index. 
Ceiie disposition nous dvite d'avoir k enregistrer el 
conserver des noms d'index. 

Deux auu-es informaiions sont Sgalemcnl inldressantes. II 
s'agil de la plus haute cl6 possible pour un fichier ei 
I'existence ou non d'un tableau des enregistrements occupfis 
dans le cas d'une indexation automaiique. Ce dernier tableau 
est appeld ici record-map. Nous verrons plus loin 
comment iniroduire ces valeurs facultatives sans irop 
pcrturber ragenccmeni du record-zdro. 



Decisions et fourchettes 



Au stade oil nous en sommcs, nous avons rdpcnorid k pcu 
prfes toutes les valeurs essentielles que nous voulons 
enregisu-er dans le rccord-zfiro. En voici la liste : 



D^signaiioti 


Nom 


Nom 


LonEucur 


Vbiible 


&endu 


mini 


nun 


Nombrt d'enrcglilrcmenti 


Fl 


HKVl 




S 


Lnngucur de la c\6 


01 


KEYLl 




6 


Longueur de I'enregifU'cmau 


Fl% 


RECLl 




i 


Rpng Iff octcv inden 1 


n 


ROWXl 




* 


LDngumr zcnc indc^de 1 


n* 


FLDXl 




i 


Nombre dc posia indci I 


XI 


POSXl 




S 


Rang lo'DcteE indn 2 


12 


R0WX2 




i 


Longunit lonc Mate 2 


12% 


FLBX2 




i 


Komhn dc posies index 2 


X2 


P0SX2 


2 


5 


RcLours-chdnoL 






9 


9 








21 


SO 



Figure 1 : Le RccDrd-zlra et ses vileurs mlnlnu et nuxlnu 
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Soil en tout 9 variables... Cela est, cones, un peu encom- 
branl, surtout que ProDOS a la dfilicale attention de dcposcr 
un retour-chariol cnire chaque variable enregisirde. 
Heureusement, un peu de reflexion et de sens pratique nous 
monire que lout cela peut tcnir sans trop nous gener au 
niveau de la longueur minimum des enregistrements. 
Prenons le cas du fichier des dictons presents dans le 
numSro pr&fident. Nous avons vu qu'il fiiaii limiid k 99 
enregisirements puisque la ci& ne peut avoir plus de 2 chif- 
fres. La premifere variable ne dfipassera done pas 3 octets sur 
I'enregistremenl z^ro (2 chiffres et un retour-chariot). La 
longueur de la cl6 occupc 2 octets et la longueur d'enre- 
gislrement 3. Le fichier n'£iant pas indexd, chaque groupe 
d'inforraation d'index occupe 6 octets (3 zfiros et 3 reiours- 
chariot). En tout, nous avons besoin de 20 octets exac- 
lement pour lout enregistrer. Le fichier des diclons ayanl 
une longueur d'enregisiremenl de 75 octets (sans le retour- 
ch^ot), il y a done de la marge. 

II esi peu frdquent de d^finir des fichiers dont la longueur 
d'enregisiremenl soil vraiment petite et puissc poser des 
probl^mes de valeurs essentielles sur le recwd-zfiro. Si ce 
cas se pose nfiammoins, il est loujours possible de s'en 
sortir, d'une maniire ou d'une aulre. par quelques astuces de 
programmation appliqut^es k un cas prficis. 
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Pour que notre "oulil" dc geslion des records-z&'o fonctionne 
dans les meilleures conditions possibles, il est pF6f6rable de 
fixer des limites entre lesquelles les valeurs esscniielles 
pourront varier. Dans notre systSme structurd (et done dans 
le programme proposfi) ces limites sont les suivantes : 

>- longueur de la cl6 : variable, dc 2 a 5 chiffrcs. Unc cl6 ^ 
un seul chiffre supposerait un flchier ne pouvant avoir 
plus de neuf enregistremenis... Avec 5 chiffrcs nous 
pouvons aller jusqu'^ 99999 enregistremenis ; 

>■ longueur d'enregistremenl : ProDOS permet d'aller jus- 
q\i'k 32 768 octets. Nous nous sommes limitds 5 8 192 
octets soit 4 chiffres. 

Pour les index, le bomage sera identique dans les deux cas, 
soit : 

>- rang du ler octet : en accord avec la longueur maximum 
de I'enregistrement et de la zone ti indexer, la vaicur 
varieradeU 8190(1 ^4 chiffres) ; 

>- longueur de la zone & indexer : elle varicra cnire 2 et 99 
octets (1 ou 2 chiffres) ; 

>■ nombre de postes : suivanl les valeurs possibles de la 
cle, les bornes se situent entre 99 et 99999 (2 ^5 
chiffres). 

Tout cela est r6sumd dans le tableau de la figure 1. Nous 
connaissons maintenant les limites dans lesquelles nous 
pourrons fivoluer. Les formules de calcul et de conirSle 
mises en ccuvre dans le programme de gesiion des records- 
zero en dennent comptc. Le lecteur pourra eventuellement 
les modifier pour les metlre en conformity avec les travaux 
qu'i! envisage. 

Le programme mntbzero peut calculer le nombre de postes 
pour chacun des index prScis^s. Pour cela, il suffit de ne pas 
informer les zones "wombre de postes" (ou de les cffacer). 
Dans le calcul mis en place dans le programme publi6. le 
premier index est toujours privilfigid au regard dc la capacity 
mSmoire alloude au calcul, ici 24 576 octets, mais 
rulilisaieur pourra fairs intervenir des modifications. En 
changeant plusieurs fois les grandeurs introduites, on peut 
aussi affiner progress ivement le rfisultat des calculs en 
tenant compte des param&tres du fichier de donn^es. Lorsque 
le rdsultat souhaiti sera obtenu, le ddclenchement de la 
touche de fonction 3 autorisera la creation du fichier ou la 
modification du record-z6ro. 



Un peu de mathematiques 



L'un des problfemes rencontrds concemaii la possibility 
d'introduire des variables non obligatoires. Or, I'absence 
d'une variable suffit S "planter" un programme au niveau de 
I'instruclion de lecture de ces variables, Pourtani, il nous a 
paru ndcessaire d'introduire la notion de plus haute cle 
possible pour un fichier, ne fut-ce que pour pouvoir bloquer 
la numdrotation k unc valeur que Ton ne souhaite pas 
ddpasser. Imaginons un catalogue prdvu pour 3(X) articles 



maximum. La longueur de cl6 ndcessaire, soit 3 chiffres per- 
metirait de numfiroler jusqu'a 999. En 6xant la plus haute 
cl6 possible k 350 par exemple, on est siir que le fichier ne 
ddpassera jamais cctle limite et que les programmes con- 
serveroni de bonnes performances, surtoul au niveau des 
balayages. Four aniver i celle fin, la conveu.. jn suivante a 
6vi miseen ceuvre : 

>■ si une plus haute eld possible est spdcifide, elle est 
combinde avec la longueur de eld ; 

>■ si aucune plus haute eld possible n'csl spdcifide, il est 
considcrd que les enregistremenis peuvent aller jusqu'au 
maxima permis par la longueur de la eld et seule ceitc 
longueur de eld est enregistrde. 

La formule de combinaison de la longueur de cl^ avec la 
plus haute eld possible est la suivante : 

Chiffre = lus Hue Cle ' 5) + Long cle - 1 

Et les formules d'extraciion des valeiffs d'origine sont les 
suivantes : 

Plus Haute Cle = INTfChiffre / 51 

Long. cle = (Chitfre - (Plus Hte Cle'5)) * 1 

La valeur critique pcrmettant de savoir si une plus haute eld 
possible est combinde avec la longueur de eld est 5, ce qui 
correspond au maximum dc la longueur autorisde pour la 
eld. Dans nos programmes nous mettrons en ceuvre unc 
comparaison enue la longueur de eld lue et la vaicur 5. Si la 
vaicur lue est supdricure, il y a une plus haute eld possible 
et on exirait les valeurs combinces. Dans le cas contraire, la 
vaicur luc est la vraie longueur de cle. 

Une autre astuce conceme la notion de "record-map". II 
s'agil d'enregistrer, dans les index, la chaine qui indique la 
presence ou I'absence d'enregistrements dans le cas oii un 
fichier est indexd automatiquemcnt c'est ^ dire sans que 
I'utilisateur ait a intervenir au niveau du rang des 
cnregistrements. Ces "record-maps" sont de simples chaines 
dc iOO octets (on pcui faire micux !) enregislrdes avec les 
index. On gdncre autant de chaines que de centaines 
d'enregistrements possibles, cela sur commande el si les 
programmes ont did prdvus pour gcrcr ces chaines. 



Plus de Copy II 

Central Point SofiWare nous annonce que de rdcenis 
changements de lois dans diff&-ents pays & propos de la 
protection des logiciels interdisent k partir de 
maintenant loutes ventes hors U.S.A. des logiciels 
Copy II Plus et Copy n Mac. 

Pom's vendrd done Copy 11 jusqu'^ dpuisement de son 
stock, mais ne sera malheurcusement pas en mesure 
d'efTectuer de mise & niveau. 
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Le nombre de chaines exisianies est enregisir^ en 
combinaison avec la longueur de la zone indexfie qui n'esl 
jamais sup^ricure k 99, Si ce nombre est supfirieur it 100, 
alors le chiffre des centaincs indique le nombre de "record- 
maps" exisiantes, et le nombre en dessous de 100 la 
longueur de la zone indexfie. 



Pour terminer 



Nous espdrons que le lecteur nous aura suivi sans irop de 
problSmes loul au long de ces laborieuses explicailons el 
que la mise en ceuvre du programme mntbzbro lui ap- 
poriera des facilitds au niveau dc la creation et de la 
maintenance des fichlers. Certaines modifications poumant 
avantageuscment Sire faites sur ce programme pour le 
meitrc en harmonic avec Ics applications que chacun pourra 
envisager. 

Dans un prochain article, nous prdscnierons une appltcauon 

en vraie grandeur de gcsiion d'une petite bibliolhfique avec 

double index permcllani la liste alphabitique des livres par 

litre ct par autcur, ainsi qu'une recherche rapide par mots- 
cic. 



a 



iTis))) - m ' 2) 

340 TIS = LEFTS fWflS, Wl; + TIS + LEFTS (WB$,m * 
WWI 

350 WNSdJ - ••01012TF -> l-'Alde S-fTcriture R- 

Zero 4'Fin V-Valeurs" 
360 tilNSIS) = "02012': FOR » - 1 TO BOiWNSiZI - 

WHS (2) + NEXT 
370 m$(3l = -03012" + mS + TIS * PGS 
380 miSI41 = "04092" * LEFTS (WBS.tit) * »$ 

400 WN$105) = "060I7Woi7i du Fichiec i traiter " 

410 mS(06) = "06300:- 

420 WNSIO?) = "06462Prsfixe :~ 

430 f/NS<031 = "08010 Quantum du Fichiez 

440 «NS<09) = "09010 Langu^ur de cJe numerlque.. 

450 KNSIIO) = "10010 Valeur maxi de la cle 

4 60 WNSfll) = "11 03 Longueur d ' enregi stremert . . 

470 mS(12} = ■'13010Nom du ler Index 

480 mS(13) = "14010 Rang Jer octet ler Index... 
490 WNS114) - "15010 Longueur zone lec Index.... 
500 WNSU5) = "16010 Nombre de postes ler Index 

510 mSliei = "15460 Record-Map (Q/N) : 

5J0 WNSfl?) " ■■16460 Nombre de chaines : 

5*0 WNS(ie) - 'laOlONom du 2&me Index 

550 HNS (19) = "ISOJO Rang ler octet Seme Index.. 
560 WNS(20I = "20010 Longueur zone 2eme Index... 
570 mSI21) = "21010 Nombre de postes 26me Index 

580 WNSI22) - "20460 Record-Map tO/N) ; 

590 HNS<23! - "21460 Nombre de chaines ; 



Programme Mntrzero 

1 REM *i"*i«*"*"-*p"i»**'n*Ti'-*"'i"**i»i»j»j»*ff 

20 REM • MNTRZERO - Maintenance des Records-Zero 

30 REM ' Auteur : R-J Anderson 

4 REM *'*"-*ii-pi-itiT*p'«tpr"«'i"T*i""tv*i»i»<ri» 

50 REM 

60 PSrwr CHRS (41 ;~PR£3~ 

100 TEXT : NORMAL : CLEAR : D$ - CHRS (4) 
120 FOR W = 1 TO OeO:M3S = hfflS + " "; NEXT 
130 RMS - ~'SS'": FOR K 1 TO 100:RMS = PMS * "0": 
NEXT 

140 m ^ 25: DIM HNS f>/N) : REM Tableau des Libelles 
Ecran 

150 WZ = 13: DIM WZS(2,WZ): HEM Tableau des champs 
160 FOR W - 1 ro 9:LVS = LVS t "Q":HVS - HVS + "9": 
NEXT 

180 va = 76S:FG$ = "MNTRZERO" : FIS = "" 
200 REM 

?10 REM Saisie du Prefixe et de la Date 
220 CIS = 9: PBINT DS; "PREFIX": INPUT MXS: PRINT DS 
230 W = INT f PEEK (49041) / 2) :MDS = STBS !WI 
240 VDS = RIGHTS ("0" + STRS (( PEEK (490411 - M ' 
2} • 8 * INT ( PEEK (49040) / 32)1,21 *■ "/" + 

250 tins = RIGHTS ("0" + STRS ( PEEK (490401 - INT 
( PEEK (49040) / 321 " 32), 2) * "/" * WDS 

300 REM 

Definition Ecran et Zones 

310 TiS = "CESTION DES RECORDS ZERO" 

320 US = ""; FOR H = 1 TO LEN (TI5):HS = WS + "-": 
NEXT 

330 W% ^ (64 - ( LEN (TIS))) / 2:m = (64 - I LEN 



600 WNS !24) - 
IVWS (^3) - 

660 »ZSfi.01) 

670 tiZ$(l,18) 

680 t/ARCS = " 

690 REM 

700 WZS (1,2) 

"0932013- 
720 WZS(1,5) 

'•1332111- 
780 HZSd.B) 



"06550 " 

■VJUJ/" f wjiiHJj turij Id) , au/ 
= "063^092";WZS('2, OIJ = LEFTS (>mS,9) 
= "0656242":flZS(2, IS) = KXS 
":AARGS - "":WMESS = "01 " 



LEFT? (WB$, VAL 



= "0B32051-:IIZS(1,3) = 
:!tZS(l,4) - "1032053" 
= "li32043":tlZS II. 6) = 
:HZS(1.7) = "1432043" 
= "1532023" :»ZS (1.9) = "1632053" 
800 »ZS(1,10} - "1575012- liIZS (1,11) = 

"1675023":WZS(1,12) - "1832111" 
820 UZS(1,13) = "1932043":WZSfl, 14J = 

"20320^3".-ftrZSfl,I5; = "2132053" 
840 HZS(1,16) = "2075012" :*IZS (1.17) - "217SD23" 
880 COSUB 900: GOTO 1000 
900 FOR K ^ 2 TO WZ - l:fSZS(2.«) = 

(MID? (>fZS(l,W),S,2j)) : NEXT 
910 HZS(2,10) = "N":HZS(2, 16) = "N" 
520 RETURN 

1000 REM TAG 

Point-retour et afflchage de 1 'ecran 
1050 HOME :W = 

1210 FOR mi = 1 TO m:MV = VAL ( MI OS 

(WNS (HW), 1.2)) : VTAB WV 
1220 m = VAL ( MIDS imSIWW),3.2)):WT - VAL ( 

MIDS (WNS (m) ,5,1)) 
1230 POKE 1403, f/H - 1: IF WT > 4 THEN WT 

POKE 50. 63 

1250 PRINT MIDS (WNS (m) , 6, LEN (WNS (t/W) ) 

POKE 50.255 
1260 IF HT > 1 GOTO 1290 
1270 M - tf * 1: POKE 1403, ( VAL ( MIDS 

(WZS (l.W},3.2) ) - 1) 
1280 IF MIDS (>/ZS(l,W),7,l) < 

WZS (2, K) ; 
1290 NEXT m 

1300 WM = VAL ( LEFTS (HMESS,2)) - 1 
1310 VTAB 24: POKE 1403,0: CALL - B68 
1320 PBINT RIGHTS (KMESS, LEN (MMESS) - 3); 



= wr - 5.- 



- 5);: 



-6" THEN PRINT 
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1330 IF MIDS (WiESS,3.1) = "E" THEN CALL - 198 

IbOO REM TAG 

Entree Argument et Donnees 
1510 t/0$ = "".-Wf = l*M + 1: IF WH > WZ THEN WM = i 
1520 If WM <■ 3 THEN WM = fiZ 

1S30 WO - 0:WENTS = ffZS f2, IIW) : WL = WIL f MIDS 

IHZS II. KM). 5. 2}) 
1540 WV - VAL f MJDS (WZS il .MM) . 1 , 2} ) -.WH = WIL f 

MIi35 tWZSIl,WM1.3,2)) - 2 
1550 WT = VAL I MIDS fWZS (1 , m) , 7. 1) j 
1560 IF WT ^ 1 AND WK ^ 27 THEN WM = VM - 2: GOTO 

1500 

2570 If Wr = 1 GOTO 1500 
1600 WO = m i 1: IF MO > ML GOTO 20D0 
1610 VTAB WV: POKE 1403, MH + WO: POKE 50.127 
1620 PRINT MIDS (HENTS, WO, 1 1 ; : POKE 50,255 
1630 WAIT 49152,128: POKE 49168. 0:WK = PEEK 
149152) 

1640 IF WK ^ 10 OR WK - II OP WfC = 124 THEN 1630 
1 650 IF WK = 24 THEN IF m > 1 THEN WZ$ 12, MM) = 

LEFTS (WBS.ML + 2): VTAB WV: POKE 1403, WH f WO: 

PRINT MZSI2.WM]j: GOTO 1530 
1660 IF WT = 2 AND WK > 96 AND WK < 123 THEN MK = 

MK - 32 

1680 WKS - CHRS (WK) :WOS = IF PEEK (49249) > 

127 THEN was = WKS 
1 690 POKE 1403, MH * WO: IF WK ^ 13 GOTO 200O 
1710 IF MK ^ 9 THEN PRINT MIDS (MENTS, MO, 1 ) ; : 

GOTO 2000 

1720 IF WK = 27 THEN POKE 1403, WH t 1: PRINT 

WZS(2,MMI; :WM ^ MM - 2: GOTO 1500 
1740 IF WK = 21 THEN PRINT MIDS (WENTS, WO, 1 1 ; : 

FOR K = 1 TO 43: NEXT : GOTO 1600 
mo IF MK ^ 8 AND WO < 2 THEN WO = 0; GOTO 1600 
1 780 IF WK = S THEN PRINT MIDS (WENTS, WO. 1 ! ; : MO = 

WO - 2: GOTO 2 600 
1810 IF MK < > 127 THEN 1900 

1820 IF MO = ML THEN WENTS = LEFTS (WENTS, WL - 11 

+ ' GOTO 1860 
1330 IF MO ^ 1 THEN WENTS = RIGHTS (WENTS, ML - 1) 

+ " "-■ GOTO 1360 
1840 WENTS = LEFTS (WENTS, WO - 1) + RIGHTS 

(WENTS. WL - WO) * " " 
1860 WZS(2.MM) = WENTS: POKE 1403. WH f 1: PRINT 

WBNTS: GOTO 1610 
1900 IF was < > GOTO 2000 

1920 IF WT ^ 3 AND (WK < 47 OR WK > 57) AND WK < > 
32 GOTO 1630 

1960 PRINT WKS.-: IF WL ^ ! THEN WBNTS = WKS: GOTO 
1600 

1970 IF WO ^ 1 THEN WENTS = WKS * RIGHTS (WENTS, WL 

- WO) : GOTO 1 600 
1980 IF WO = WL THEN WENTS = LEFTS (MENTS, WO - 1) 

+ WKS: GOTO 1 600 
1990 MENTS = LEFTS (MENTS, WO - 11 * WKS + RIGHTS 

(WENTS. WL - WO): GOTO 1600 

2000 POKE 1403, MH * WO: PRINT MIDS (WENTS, WO, 1) ; 
2010 WZSI2.WM) = WENTS: IF WOS = "" AND MK < > 13 

GOTO 1500 
2030 VTAB 24: POKE 1403.0 
2500 REM 

Saisie du Prefixs 
2520 IF MZS(2.1B) < > LEFTS (MBS, VAL ( MIDS 

(WZS 11.18} .5.2))! GOTO 2600 
2530 PRINT DS; "PREFIX': INPUT WXS: PRINT DS 
2550 WZSI2.1B) = LEFTS (WXS + WBS. VAL I MIDS 

(MZS(1.13).5.2))I 
2600 REM 



Construction de 1 'argu/nent 
2620 WXS = FOR M - 1 TO 24 

2630 IF MIDS (WZS 12.18) .M.l) < > - " THEN WXS " 

WXS * MIDS (WZS(2.18).W,1I 
2610 NEXT W: IF LEFTS (MXS.l) < > "/" THEN WXS = 
-f WXS 

2650 IF LEN (WXS) > 24 THEN WXS = LEFTS (WXS. 24) 

2660 WZS(2,1B> = LEFTS IMXS + WBS. 24) 

2670 IF RIGHTS (WXS. 1} < > '/" THEN MXS = WXS + 

2700 FIS = "": FOR W = 1 TO Clt 

2710 IF MIDS IMZS(2.1).W,1) < > " " THEN FIS = 

FIS + MIDS iMZS(2, D.W.I) 
2720 NEXT WiMARGS = WXS + FIS 

2800 WMESS = "00 ".-WPS = IE WOS = THEN 4000 

3000 REM 

Test des Touches de Fonction 
3050 IF MOS < > "I" AND WK < > 33 GOTO 3250 
3100 FOR W - 1 TO 5: HOME : PRINT "PANEL D'AIDE" 
SPC< 60) PCS; 

3120 PRINT MIDS (WNS 12) . 6, 80) ; : FOR WW = 1 TO 20 
3130 READ WS: IF MS = "*•" THEN MS = "':WW = 21:W = 
5 

3150 PRINT WS: NEXT WW: VTAB 23: POKE 1403.0 

3170 PRINT MIDS (WNS (2) . 6, 80) ; : PRINT "Pressez une 

Touch e "; 
31S0 GET MS: IF WS = "" GOTO 31B0 
3190 PRINT : NEXT W: RESTORE 

3200 WMESS - LEFTS ("0" + STRS (MM), 2} * "AAide 

terminee"; GOTO 9000 
3250 IF WOS = "3" OR WK ^ 34 GOTO 4000 
3270 IF WOS ~ "4" OR WK - 39 THEN NEW : END 
3310 IF MOS = "V" OR WOS - "V GOTO 4000 
3410 WMESS = LEFTS f"D" + STRS IWM},2) + "B" 
3420 WMESS = WMESS + 'Touche de Fonction nan 

definls': GOTO 9000 

4000 REM 

Trditeraent selor argmnsncs 
4010 IF FIS = ■"■ THEN WMESS - •■OlENom rlchtsr 

absent": GOTO 9000 
4020 IF WARGS = AARGS GOTO 5000 
4030 GOSUB 900:Rlt = 0:WF = 0:WZS(2,2) = "0 
^050 ONERR GOTO 4030 
4060 PRINT DS; "PREFIX" ;MXS 
4070 PRINT DS: GOTO 410O 

40eO WMESS = "IBAPreflxe " + WXS t " i ntrouvable" 
4090 PRINT DS: GOTO 9000 
4100 ONERR GOTO 4150 
4110 PRINT DS: "VERIFY"; WAS 
4120 PRINT DS: GOTO 4200 

4150 WMESS = "03AFic!iier inexistant. citation 
possible" 

4160 PRINT DS: POKE 216,0: GOTO 9000 
4200 ffF = 1 

4210 PRINT DS; "OPEN"; WAS 
4220 ONERR GOTO 4350 
4230 PRINT DS; "READ"; WAS 

4250 INPUT FO.Ca.FOt. II, Ili.Xl. 12, I2t.X2 
4260 PRINT DS;"CLOSE": PRINT DS 
4270 Rlt = 1 ; GOTO 4400 

4350 FO = 0:WZS(2.2) - LEFTS ("0" + WBS, 5 J 
4360 W = PEEff (222) :WMESS = "03AAnomalie sur record 
zero, mais" 

4370 IF W ^ 5 THEN WMESS = "03APas de record zero." 
4330 WMESS = WMESS + " creation possible" 
4390 PRINT DS; "CLOSE"; WAS: PRINT DS: POKE 216,0: 
GOTO 9000 

4400 FOt = F0% - 1: REM Remplissage des zones par 
les valeurs lues 
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4430 VZS(2,2I = LEFTS f STRS (FOI + WBS.SI 

4490 HO - 0: IF CO > Sfi THEN HO = INT (CO / 5) :C0 = 

!C0 - (HO • 5)) + I 
4510 IHZSI2.3) = STR$ <C0) 
4520 iiZSI2,4) = STRS (HO) 

4530 WZS(2,5) = LEFTS ( STRS fFO%l + UBS. 4) 
4600 IF II ^ GOTO 4700 

4610 WZS(2,10) = "N': IF II* < 100 GOTO 4650 
4620 WZS(2,10) = '0":W = INT (11% / 100} 
4640 WZS(2.11) = LEFTS ( STRS (W) + WBS,2> 
4650 WZS(2,6) = FIS + ~X1" 

4670 tlZS(2,71 = LEFTS ! STRS (ID * WB$,4I 
4630 WZS(2.8) = LEFTS ( STRS (Iltl * WB$,2I 
4690 HZS(2,91 - LEFTS ( STRS (XI) * WB$,5) 
4700 IF 12 ^ GOTO 4900 

4710 >/ZS(2,16) - -N": IF 11% < 100 GOTO 4650 
4720 WZS(2,16) = '0":ft = INT (lit / lOOi 
4740 t/ZS(2.171 - LEfTS ( STRS (W! + WBS.2) 
4750 HZS(2,12) = FIS * "X2" 

4760 WZS (2,131 = LEfTS f STRS 1121 * WBS, 4) 
4770 HZS(2.14] = LEFTS ( STRS (12%l + UBS, 2) 
4760 UZS(2,15I = LETrS f STRS (X2I * WBS, 5 J 
4900 REM 

4970 IfMESS = 'OZARecord-Zero existant. Modifications 

possibles' 
4990 GOTO 9000 

5000 REM TAG 

ControJe de validitB des zones 
5030 cot = VAL <«ZS(2.3jj -.CO = COt 
5040 HO = 7RL (»ZS (2, 4 1 } : F0% = VAL (>/ZS<2.5)l 
5050 IF CO* > THEN C9 = VAL ( LEFTS (HVS.COt) ) 
5060 IF cot < 1 OR CO* > 5 THEU MMSSS = 

"QJELongueur de cle incorrecce": GOTO 9000 
5030 IF FOt = THEN HMESS - "OSELongueur 

enregi szrement absente"; GOTO 9000 
5090 IF FO* < tl THEN WMESS = "OSELongueur mini 41 

octets': GOTO 9000 

5100 IF HO > C9 THEH HMESS = "04EValeu[ ntaxi hors 

limlte": GOTO 9000 
5110 IF HQ = THEN HO = C9:WZS (2,4) = LEErS ( 

STRS (HO) t mS.5) 
5120 IF HO > AND HO < C9 THEN CO - (HO • 5) + COt 

- 1 
5150 REM 

5160 IIS = LEFTS (WBS. 9) -.125 = IIS 

5170 MIS = WZS (2,10) :M2S = WZ$(2,16) 

5190 W = 24576: REM Memoirs reservee aux Index 

5200 REM 

Trai tement premier Index 
5220 lit = VAL (WZS (2, 8) I -11 = VAL (>IZS(2,7)) 
5230 IF 11* = a AND II ^ GOTO 5600 
5240 IF II* - THEN »MESS - "03ELongueur zone 

Index 1 absente" 
5260 IF II ^ THEN HMESS = "OlERang ler octet 

Index 1 absent" 
5270 IF (Hi + III > FO* THEN HMESS - "07EVaJeur 

incorrects" 

5230 IF LEFTS (HMESS. 2) < > "00" GOTO 3000 
5290 IIS = Fl$ * 'X1-:WZS (2, 6) - LEFrS (IIS + 

WBS, 1 1 ) 
5310X1 = VAL l>IZS(2,9j) 

5320 IF XI ^ THEN XI - INT (W / II*) 

5330 IF 1X1 • lit) > W THEN WMESS = "09EIndex 1 

trap gTos': GOTO 9000 
5350 IF XI > HO THEN XI = HO 
53 60 WZS (2, 9) = LEW f STRS (XI) * WBS, 5) 
5400 IF Mis = "N" GOTO 5600 

5420 IF MIS < > "O- THEN WMES? = "lOEO/N pour la 



j-ecord-juap"; GOTO 9000 
5440 Ml = VAL (WZS (2. 11) I :WW ^ Ilt:ll* - (Ml ' 100) 
•f 11* 

5450 IF Ml < 1 OR Ml > 10 THEN WMESS = "llENombre 

de chaines incorrect": GOTO 9000 

5600 REM 

Traitement deuxi^we Index 
5620 12* = VAL (WZS (2, 14) I : 12 = VAL (HZS(2.13}I 
5630 IF 12* = AND 12 ~ GOTO 6000 
5640 IF 12* = THEN WMESS = ~14ELangueur zone 

Index 2 absente" 
5660 IF 12 - THEN WMESS - "I.SERsng ler octet 

Index 2 absent" 
5670 IF (12* * 12) > FOt THEN HMESS = "13EValeur 

incorrecte" 

5680 IF LEFTS (WMESS, 2) < > "00" GOTO 9OO0 
5690 I2S - FIS * "X2':WZS (2,12) = LEFrS (I2S + 

WBS. 11) 
5700 H = W - (XI - WW) 
5710 X2 ^ VAL (HZS(2.15I) 
5720 IF X2 = THEN X2 - INT (H / I2i> 
5730 IF (X2 ' 12*) > W THEN WMESS = ~15EIndex 2 

trop gros" t STRS (W) : GOTO 9000 
5750 IF X2 > HO THEN X2 " HO 

5760 WZS(2,15> - LEfTS ( STRS (X2) + HBS,5) 
5800 IF M2S = "N" GOTO 6000 

5820 IF H2S < > "O" THEN HMESS = "16E0/N pour la 

record-map" : GOTO 9000 
5340 M2 = VAL IHZS (2, 1 7) ) : 12* - (M2 * 100) + 12* 
5850 IF M2 < 1 OR M2 > 10 THEN HMESS = "1 7ENon\t3re 

de chaines incorrect": GOTO 9000 
6000 REM Fin traitement Index 
6020 IF LEFTS (WMESS, 2) < > "00" GOTO 9000 
7000 REM 

VisuaJisation des Valeurs essentielles 
7020 IF H05 < > "V" AND HOS < > "v" GOTO 7500 
7050 HOME : PRINT "VALEURS ESSENTIELLES" SPC I 

52)PGS: 

7060 PRINT MIDS (WNS (2) , 6, BO) ; 
7080 VTAB 4: PRINT "Norn Fichier = ".-F2S; 
7100 PRINT TABI 28)"Prefixe - ";HXS: PRINT 
7110 PRINT " Long. Cle = ",-COt,- TAB( 28),-"P.H. 
Cle = ";H0; 

7120 PRINT TAB( 47j;"Long. Enregi strement = ";F0» 
7130 PRINT " Enregistre = ",-CO 
7200 VTAB 09: PRINT "Norn Index 1 
7210 PRINT " Rang ler octet 

40) "Record-Map = ";mS 
7220 PRINT " Longueur de zone = 

40) "Chaines = ",-Ml 
72J0 PRINT " Nombre de pastes = 
7300 VTAB 15: PRINT "Nam Index 2 
7310 PRINT " Rang ler octet 

40) "Record-Map = ";M2S 
7320 PRINT " Longueur de zone - 

40) "Chaines = ":M2 

7330 PRINT " Nombre de pastes = ";X2 
7340 VTAB 23: POKE 1403,0: PRINT MIDS 

(HNS (2), 6, 80); 
7350 PRINT "Pressez une Touche ",-:US = 
7360 GET WS: IF WS = "~ GOTO 3970 
7430 WMESS = LEFTS CO" * STRS (HM),2) + 

"AAf fichage ter/nine" 
7450 GOTO 9000 
7500 REM 

7520 IF HOS < > "3" AND WOS < > CHRS (34) THEN 
HMESS = "OlADonnees correctes. TF3 ecrit ie 
Record-Zero": GOTO 9000 

aOOO REM 



";I1S: PRINT 
II; TAB( 

11* TAB( 

XI 

";I2S: PRINT 
12; TAB( 

I2t TAB( 
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wise A Jaur du Record Zero 
8020 FO = VAL (»ZS(2.2)) 
B050 WMBSS = "Creation fichier " 

8060 IF W - 1 THEN WHESS = "Modification fichier " 
S070 WMESS - * FIS f " sn cours..."; GOSUfl 

8900 

8120 FO! = F0» + I: PFINT DS; "OPEN";WA$; L-,-FO* 

8130 PRJKT DS; "WRITE-; WAS;'. RO" 

8140 PRINT FO: PRINT CO: PRINT FOi 

8150 PRINT II: PRINT Hi: PRINT XI 

8160 PRINT 12: PRINT I2»: PRINT X2 

8170 PRINT DS: 'CLOSE- ;WAS 

8180 PRINT DS:FOi = FOI - 1 

8200 IF II ^ AND lit ^ GOTO 8400 

8210 MMES$ = "Creation Index " * IIS + ' en 

cours...": GOSUB 8900 
8220 WWS = WXS +115 
8230 PRINT DS; "OPEN~;HWS 
8240 PRINT DS;"miTE";mS 

8250 IF mS - "0" THEN FOR H = 1 TO HI : PRINT RMS: 
NEXT W 

8260 FOR ft ^ 1 TO XI: PRINT " NEXT W 
8210 PRINT DS; "CLOSE" ;mS: PRINT DS 
8400 IF 12 ^ AND 12% = GOTO 8500 
8410 HMESS = "Creation Index " * I2S * " en 

cours. . .": GOSUB 8 900 
8420 WW5 = WXS t I2S 
8430 PRINT DS; "OPEN'; mis 
8440 PRINT DS; "WRITE"; mis 

8450 IF M2$ = "0" THEN FOR W ^ 1 TO M2: PRINT RMS: 
NEXT W 

8460 FOR W ^ 1 TO X2: PRINT " ": NEXT W 
8470 PRINT D$;"CLOSE";WWS: PRINT DS 
8500 REM 

HSID PRINT DS; "FRE";WWS: PRINT D$ 

B600 WMESS = "OlACreation Fichier " * WAS * " 

terminSe. " 
6880 GOTO 9000 

8900 VTAB 24: POKE 1403,0: CALL - 868: PRINT 

WHESS; : RETURN 
9000 REM TAG 

Point d' atiantissement general 
9010 AARGS = WARCS: IF MIDS fWHESS,3.1) - "A" GOTO 

1000 
9020 GOTO 1300 

9050 DATA "Norn du Fichier :": DATA " 



J 'enregisCrement de plus" 
9180 DATA "baut rang du fichier. Les limic.es sont 
2 et 5. ", 

9200 DATA "Plus Haute CI6 :": DATA " 



9210 DATA "La plus haute cle est facultative. 

C'est une valeur qui sera" 
9220 DATA "cofnbinee avec la longueur de la cle, 

pour liiaiter la nunieratatlon" 
9230 DATA "des enregistrements au rang voulu.", 
9250 DATA "Longueur d 'enzegistrement : ": DATA 



9260 DATA "La lon^eur d ' enregistrement peut 
warier entre 41 et 8192 octets." 

9270 DATA "Danner la vraie longueur des donnees. 
Le retour-chariot sera" 

9280 DATA "ajoute automat iquentent par le 
programme. ", 

9300 DATA "Indexation :": DATA " " 

9310 DATA "Les valeurs pour les index et record- 
map sont identiques pour" 

9320 DATA "chaque index possible. Les index sont 
calcules selon une place" 

9330 DATA "en memoire conventionnelie de 24.576 

octets. Les valeurs limites" 
9340 DATA "sont sp6cifiees sue les ecrans 

suivan ts . , . ", , 
9350 DATA "Rang du ler octet :": DATA " 



9060 DATA "Le nom du Fichier ne doit pas exc6der 

NEUF caractkres." 
9070 DATA "11 dolt ^tre entre sans le Prefixe qui 

est A Indiquer dans" 
9080 DATA "la zone spedfique. Le Prefixe est 

facuJtatif si Je fichier" 
9090 DATA "eat cree sur le prefixe en cours.". 

9100 DATA "Ouantua :": DATA " " 

SlIO DATA "C'est Je nombre d 'enregistrements 

exisCants dans le fichier en" 
9120 DATA "cours de traJtement. Si ce fichier 

n'exlste pas ou s'il n'a pas" 
9130 DATA "encore ete mis i jour, cecte valeur est 

zero. Le programme" 
9140 DATA 'ne peut la modifier.', 

9150 DATA "Longueur de Cle :": DATA " 

, " 

9160 DATA "Conner Ja longueur reelle de la cle 

nLunerigue qui sera utIJisde" 
S17D DATA "c'est a dire, la longueur du chiffre de 



9360 DATA "C'est la position du ler octet de la 

zone A indexer, par rapport" 
9370 DATA "au ler octet de 1 'enregistrement . Le 

ler octet de 1 'enregistrement" 
9380 DATA "porte ie numero 1.". 

9400 DATA "Longueur de Zone :": DATA " 



9410 DATA "Donner la longueur, en octets, de la 

zone a indexer. Cette vaJeur" 
9420 DATA "peut varler entre 2 et 99 octets. ", 
9450 DATA "Nombre de postes :": DATA " 



9460 DATA "Specifier le nombre de postes desires 

pour I'index. Le programme" 
9470 DATA "peut calculer cette valeur 

automatiquement . II suffit de ne rien" 
9480 DATA "specifier dans cette zone ou de 

1 'effacer. ",. ,. 

9700 DATA "Record-map :": DATA " " 

9710 DATA "Specifier par ou N si un tableau 

d 'assignation d ' enregi st rement s " 
9720 DATA "est desire, dans le cas d'une 

indexation automatique , Les tableaux" 
9730 DATA "d'enregistrements sont Merits au debut 

des index sous forme de" 
9740 DATA "chaines de 100 octets commencant par le 

code -MAP'. ", 

9750 DATA "Nombre de chaines .- ".- DATA " 



9760 DATA "La record-map est constituee de chaines 

de 100 octets. " 
9770 DATA "Donner le nombre de chaines necessalres 

au traitement, " 
9780 DATA "compte-tenu de la vajeur maximum de la 

cle. '. 
9800 DATA *•, *• 
9900 END 
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"Lmik Scfttuarz 



Avant toute chose, dressons la liste du 
materiel indispensable pour r^aliser 
cette operation. 




Gifftrl .06 




i/ Un Macintosh ; 

✓ Un Apple riGS ; 

✓ Le logiciel shareware Giffer sur 
Macintosh ; '^'•^ 

✓ Le logiciel shareware ShrCORUCrt 
SHRConven sur Apple IIGS ; 

Les logiciels systfemes MacOS 6.0.5 et OS/OS 5.0.2 
ou uli^rieurs ; 

\/ Lc logiciel ResEdit sur Macintosh , 



Transfert d'images 
couleurs Apple IIGS vers 
Macintosh 

■ Lanccz SHR Convert sur I'Apple ItGS. 



Select Dictui e tijpe to convei t 



rnpplellfnili) 



flpple llqs specific 



Atari ST 

CoguDodore Wil^ 
Hacintosh 

Cmputer-independent 



ACtmputer tup? C lood j 
t info on fnnnt ') Specific tape V 



Type SCi'iPHDcomoiessed 



Ttipe (Ci CIC} non-CMpressed 

PSllgs color graphic 

PSII9S built-in (GRflPHIC.CGTD-7) 



Select foimot foi saved pictures 



( Infoonfomot ] ( Save ] 



[ 



$CM PcintHorksU.D (□bsolete) 
$C0.1 PackButes (obsoUte) 
SC0.2nppliPrirerrH 
jci non-c[»nres5ed iCfMn 



GIF iClS Giaphics Iniei channel 



S^leciionnez dans la 
liste sup^rieure de 
I'image ci-contre !e 
typed'imageS 
charger . 

' S^lectionnez ensuite 
le so us- type 
sp&ifique de 
I'iinage ^ charger, 

' Utilisez I'aide en 
ligne si vous dSsirez 
en savoir plus sur le 
type de fichier 
image Apple II ou 
GIF. 

Cliques a l'iiit£ticui 
de la fenetre 
rcprfiscnlfe ci- 
contrc. 
S61ectionnez 
I'option GIF (CIS 
Graphics 
Interchange). 



Cliquez ensuiie dans le bouton Save et sSlectionnez la 
lailie de I'unage. U faui presser Return ou bien cliquer dans 
un bouton. 

L'interface standard Apple pour I'enregisirement des 
fichiers apparati et vous demande sous quel nom vous 
dSsirez enregistrer cette image. Donnez done un nom ou 
conservez le nom par dSfaut, puis pressez Rm ou sur Save. 

Un nouveau dialogue apparait el affiche un lexie informaiif 
ainsi qu'un ihermom&tre montranl Tavancemeni de la 
sauvegarde. 



Une fois Tenregislrement 
lerminfi, un bouton le 
stgnalani s'affich^ i la 
place du ihermomfeire, 
L'image ainsi sauvegard^e 
estdu type S0€ (BIN), 

auxtype $0000. 



If tMt filt it ti) br uploaded to t 
CMputtr (irviet gr B9S, sltoii 
incUdt ch( foil wing dota in iti 
ilticription: 

HI I Ilf I li / 

Tblt InfarBttloR ftht >1cturi'i 
boriiontPl k vcrtici)] %iit. nuabtr if 
cilDit, and polrttr rangrlwtU ttlp 
dmnlppdcts to cituotc hoHHtU tht 
filt will turn out d> Ihtir portitulor 
■lophici hprihfan. 



iiii.i;i;.iiii5i'iiiiWt:)iii 



Lancez Apple File Exchange sur 
Macintosh. Transfdrez l'image GIF 
puis quittez et lancez ResEdit. 



Apple File Exchange 



S^Iectionnez l'image u-ansKrde. Puis ouvrez une fenetre 
d'information ^ I'aide de I'option Get Info du menu File. 



Lisez le manucl d'accompagnemenl de 
ResEdit pour la description du 
fonctionnement de ResEdiL 
Attention, ResEdit est un |Ht>duit & utiliser 
avec precautions. En effet, mal utilise, il 
peut d£truire des fichiers. 



■ ■-■a 
laua 

Prararaniit— 



Bin 



IB 



n faut maintenant modifier le type et le cr^teur afin que 
Giffer puissc charger cclte image. Pour ce faire ; 

✓ s^lectionnez la case Type et remplacez 06 par Gwe ; 

✓ s^lectionnez maintenant la case Creator et remplacez 
pdos par GIF£. 

Lorsque ie type et le crfiateur du fichier GIF a ^tfi modififi 
comme sur l'image ci-aprfes, cnregistrez les modifications 
ou bien fermez la fen^re. 
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I InlD IDT (Hi ItaCIN.tIF I 



lltl 



□ gng«a □ iMtu 

□ Ihara* nil !■»• 
n KTuiyi ■iwlITJt iBuncIt 



□ I 

□ l«c«M__ 



□ FN. nurf DrMi iiHK oiinn-HKt 



I'Ot/tD l(:S4:3T 



cnxta 

Miaurea Turk iLifl - Alt) b|ft«i 
tail fart aiia-^ftDI byiii 



Pressez Return ou cliquez sur 
Yes. 



Sivousn'avezpas 
enrcgistrfi les 
modifications, le 
dialogue ci-dessous 
vous demande si vous 
dfeirez le faire. 



■■■ -InTi F>t nM ICMCMIIF- 



Quittez ResEdit par #-Q ou bien en s6lectionnanl Toption 
Quit du menu File. Vous pouvez maintenant lancer GifTer 
en ouvrant le menu File, ei s6Iectionnant I'option Open 
GIF nie. 

A I'aide de I'interface standard Apple de selection de 
fichiers, choisissez une image. 

Aprfis quelques secondes, une fenelre contenant I'imagc 
transfdrde apparatl. Un dSiai! cependant : comme vous 
pouvez le constaier sur voire £cran, I'image est dislordue. 
Pas de panique ! 



TuudiUp 
Zoom... 



Shift Scan Line... 
Use Default Palette 



Ouvrez le menu 
TouchUp el validez 
I'option Zoom... 



La rasolution affichfie est de 640 x 200, celle de I'Apple 
lies. 



Nbui uiiaih: 
New hslgtit: 



640 



ZOO 



|[ ChBngtJl tancel ] 
[Heueri [homa or »pBCe|] 



Half 
IFZ ortm<l<-l 



Doubls 
[F3 orcmd ->I 



Ouortsr 

in] 



QuBdruple 
IF4I 



Modifiez done la valeur 
vcrticale pour afficher 
400 iignes au lieu de 
200 et pressez Retour 
ou cliquez dans le 
bouton Change. 



SSlecLionnez I'option Memorize Picture du menu 

IffiageSt6Fa|§, puis uiilisez Tune deg options de 

sauvegarde du menu File afin de sauver I'image. 

Transfert d'images 
couleurs Macintosh vers 
Apple lIGS 

Lancez Giffer sur Macintosh, puis chargez une image ^ 
I'aidc de I'une des options Ouvrir du menu File. 

✓ Seiectionnez I'option Save as GIF file... et 
sauvegardez I'image. 

✓ A I'aide d'AFE, iransfferez I'image Mac sauvegard^e 
au format GIF sur une disqueile Apple II. 



Lancez SHRConvert. 
Udlisez I'option 
Change File 
attributes du menu 
File. Modifiez le type 
el donnez lui la v^eur 
$06 (BIN), puis 
passez !e sous-type h 
la valeur SOOOO. 

Sdlectionncz le type 
d'imageS charger 4 
partir de la fenetre 
Select picture type to 
convert. 

Cliquez dans le 
bouton Load, puis, 4 
I'aide de I'interTace 
standard de selection 
de fichier, chargez une 
image GIF. 



Oum^i: /VIK/MCJir 

IKIUHNCtMim) iHHliMt: [m I 

111 ■n.Uic IMH ■■■i.tpr |hiW | 

t UrtfKniitH J 

[ Ewtl ~1 




Select picture t>iDe In contfcrt 



Ruple II fMilH 
Rgple Ilgs specific 
ntori ST 

Cwnodare 6M/12S 
Macintosh 

t(wputer-indtiiend«^ 



A Computer tap? f 

( Info on fomat ) Scecif ic typf V 



Load 



■■ EIF (OroDhics Interchange Foroflt) 
RLE (Run Length Encading) 



Un dialogue de selection 
apparait ei vous propose 
plusieurs choix. 

A vous d'effectuer Ic bon 
choix en fonciion dc la 
definition d'origine de 
I'image et des couleurs 
prdsenles. 



Processing 61FB7d file... 
Raster width: tHO 
Raster height: 100 
Color nap size: 16 
Palette range: i|09& 
(§>CDlcjIated palette 
ODefault color nalette 
OGraHscale polette 

^Use 3Zl)liiode:16color5]) 
[Use BMP node: 1 colors^ 



Ou trouver les produits ? 

Giffer pour Maciniosh : sur la disquette Pom's n°49 ; 
SHRConven pour Apple IIGS : CalvaCom, GS Club el 
Pom's {DPA007); 

ResEdit pour Macintosh : APDA France et CalvaCom ; 
Les logicicls systiime MacOS 6.0.5 et GS/OS 5.0.2 : 
revendeurs Apple. 



a 



Erratum 

L'adresse du revendeur de Keylock (Pom's 48, encadr^ 
page 43) est : MactiqUE 
Box 965 

33 Gavl, Sufede 

Tfiiecopie : (46) 26 17 24 02 
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6S 



Un C(DJlformateur 



Format 

Dans le Pom's n° 35, Pierre Demblon 
se tamente : on ne dispose loujours 
pas d'line commande Formal univer- 
sclle, permettant de formater toul 
disque ProDOS. C'^tait vrai, mais 11 
se irompait en avansant qu'une lelle 
commande n'existerail qu'i partir de la 
future version 2.0 du ProDOS 16. En 
pffet, flan': le^ PrnnOS 16 vl I 
Release Notes and Documentation 
Updates du 15 dficembre 1986, la 
ProDOS Team annonce que ce 
formatage existe dans ProDOS. 

Oui, il s'agit bien de I'appel $24, 
expliqu6 et commentd dans te source 
APW du CDA qui suit et, qui permet, 
selon Apple, de formaler lous les 
lecieurs pouvant supporter ProDOS, 
dont ceux se branchant sur le Smart- 
Port, et les Disk II. Je peux d'ores et 
d6j& vous dire que cela fonciionne trfes 
bicn sur le vieux Disk II, les 3.5" ou 
le Ramdisk. Le lout dtaii done de 
ruiiliser. La version aciuelle de ce 
CDA est comme I'appel $2^ (for- 
mat) : elle ne supporte actuellement 
que ProDOS. Mais plus lard, elle 
devrait pouvoir formaler les autres 
systSmes d' exploitation d' Apple, du 
DOS 3.1 aux sysifemes du Mac, en 
passant par CP/M ou le Pascal 
UCSD. Toul ddpendra de ce qu" Apple 
mettra dans sa commande format. 
Testez d^jk les CDAs sous un vieux 
ProDOS 16 ei sous GS/OS, vous 
m'en direz des nouvclles. 

Mieux encore, avec le source de 
Format, vous pouvez obtenir un autre 
CDA : I'Effaceur, qui vous sera utile 
si vous voulez supprimer rapidemenl 
le concenu de voire disque, sans 
ailendre, sans avoir \ le re formater, 
sans avoir k effacer un £i un les 



fichiers, et sans avoir & charger un 
autre logiciel. C'est ce qu'on ttouve de 
plus rapide quelle que soil la capacity 
du disque, puisque ce CDA se contente 
d'effacer les blocs servant ^ booter et 
de vidcr le repertoire et la Bitmap 
d 'occupation des blocs. 

Pour modifier le source de Format afin 
d'obtenirceiui de I'Effaceur, il suffit de 
remplacer I'appel S formac par un 
appel a Tune des demifires commandes 
ProDOS dficrites dans les Release 
Notes for System Disk 2.0 du 4 mars 
1987. I'appel S25 (erase Disk), qui a 

exactement les memes paramfetres que 
Format. Vous changez I'en-tete du 
CDA situ^ dans le segment Data, et il 
n'y a plus qu'k assembler. 

Sous APW 

Pour ne pas se casser la tele et 
automatiser un peu I'assemblage / 
linkage des CDAs, nous avons deux 
fichiers. Pour uiiliser vos CDAs, il ne 
vous reste plus qu'i les mettre dans le 
so us -directory /system/Desk .Aces 
puis de relancer le sysL&me, ou encore 
de les charger k i'aide du NDA de 
Fr&i6ric Rozay. 

Utilisation 

C'esl simple comme un bon CDA. 

InstallSs dans le menu Desk 
Accessories ((5 -Ctrl-Esc) , ces deux 
ouiils tiennent compte du mode vid&o 
40 ou 80 colonnes, et des lecteurs 
ProDOS inslallfis. Sous GS/OS par 
exemple, vous pouvez appeler le 
disque ^ trailer de multiples fa^ons : 

H par son nom de volume s'il a d6j& 
&{& formal^ (done commen^ant par 
un/); 



(Patrice 9\[eveu 



T par le nom du lecteur 
{.AppleDisk3.5A, OU .DEV3 par 

exemple) ; 

par le nom abr6g6 du lecteur (. D2 
par exemple). 

Ensuite. tapez le nouveau nom du 
volume. Si vous ne tapez rien, le 
disque seranomm6 /Disque. vide. 

Bibiiographie : n'oabliez jamais, 
amis programmeurs, de fouiner duns 
les System Disk Release rigulii- 
rement imprimies. Elles contiennenl 
bien souvenl les reponses d vos 

ques'tions a'usst ^leh au niveau cles 
nouveaux appels qui vous font 
cruetlemeni d^aut. qu'au niveau des 
bugs connus des diveloppeurs Apple. 

A signaler 

Au fait, puisqu'on en est ^ rectifier 
quelques errcurs, en voici deux qui 
m'onl fail loul dr6!e : 

■* Pom's 35, page 29 : sous APW, 
1 280Ko de RAM (dont une panic 
en Ramdisk) el 1 O8OK0 d'espace 
disque (plus le Ramdisk) suffisenl S 
programmer d'assez grosses appli- 
cations en assembleur (plus de 200Ko 
de source), quoi qu'en dise Apple. 

V Pom's 37, page 63 : pour ceux qui 
foni de la programmalion Multi- 
Langages. il existe un iroisifeme 
choix : APW (eh oui), avec lequel 
vous pouvez assembler vos segments 
s^par^ment el les linker plus lard, avec 
ou sans bibliothfeque, D'ailleurs un 
exemple de passage de paiamfecres entre 
un segment 6crit en C ei un autre en 
Assembleur est donn6 dans la 
documentation dfiveloppeur. 
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Erase.Edline 



* ■■ir**«ptj»i»jti»*i«iti»iri»**j»j»*-it*it-i»*i»***i*-j»**ii-i»*i»i»]t-**i»dit 

* EdLine v2.1 Patrice Neveu - JollClel 90. » 

* m 

* Sdlteur de llgne aux fonctlons redultes; ' 

* * 

* Posslbllite de coder I'afflchage ' 
'{Delate], Fleches gauche et droite, fUeturn],' 

* (Escape! ' 
' Chaine de caracterea precedes par sa taille ' 

* » 

* Appeli idx iUbr_Car_Max Nombre de caract max' 

* Ida tBuffer_Adr_3 Adresse 8 bits du buffer ' 
' c- 1 code 1 'afficftage par des X ' 

* jsr EdLlne * 
•bcc Bonne_Salsie c- 1 si eu esc pour sortir ' 

* i 

irii>itit*>iti>it*i>i>it*ir*itititiF*ir 20/02/90 •"•">'""" 
EdLlne snap 
Buffer anop 



KbdStb 



gequ SOOCOlO 



- Utilisation: * 

' Appeler alnsi: * 

* * 

' Jsr EdLine D' affiahage du debut de la chaine' 



' Lss Codes lus sont tous avec le bit la 1. La 
routine de lecture clavier * 
■I'annule. Alnsi, on a: Les ConTRoLes 100. .IF}' 
'La ponctuation 120., 2F1 U {3A..3F1 U I5B..601' 

* Les chiffres 130.. 39} ' 

* Les majuscules 141.. 5A} * 
' Les minuscules 161. .70} U 140} • 



Le 18/03/89 =========' 



' Initialisatian et attente d'une Louche 



php 

pour garder carry 

Idy ISFFFF 
sty HasqGe_AND 
stz Masque^ORA 
pip 

bcc No_Code 
alars on dolt proteger 

Idy t$58 

sty Masque_ORA 
X 3 chaqve caractere tape 

stz Masque_AND 

le caractere 
No_Code aaop 

stx Max_Length 
sta Buff_Add_l-H 
ata Buff_Add_2+l 
sta Buff_Add_3+l 

stz CharPti 
Position du cur seur 



Empile 



Recupere carry 
Si c= ] 

Code de 'X' 
Met un 

Efface 



stz Line_Length 
de caracteres tapes 

Get_Char Ida >KBd 

d'une frappe au clavier 
baii YATouche 



Nombre 



Attente 



11 y a eu touche 



*'* Dans I 'attente d'une touche, fait clignoter 
le curseur 



Curseur Norm 



Ida 
pha 

jUriteChar 

PushHord »8 
en arriere pour que le caractere 

_WriteChar 
mewe endroit 

jsr MaitAMoment 



Affiche le curseur 



Revlent 

Soit au 

Prend 



Id^ Char_Ptr 
le caractere qui est en dessous 
Iny 

shortin 

Buff_Add_l Ida Buffer, y 

longm 

and Mastp]e_AND 
ora Mascpje^ORA 
pha 

JHriteChar Affiche le caractere 
PushWord US Revlent 
en arriere pour que le caractere 

WriteChar Soit au meme endroit 



jsr WaitAMoment 
bcc Get_Char 
a eu touche depuis 



S'lJ y 



YATouche Ida >KBdStb 

ReadChar derange les valeurs de Wnd... 
* ■ 

' Quel type de touche est-ce ? ' 

t • 

Key_Pressed 1 on gin 

and t$7F Filtre; bit 8 a zero 

sta Pressed_Key 

cmp tSlF En 
dessous, c'est un CTRL 

bcc Control_Key 

cmp tS7F 
L'unique cas, c'est [Delete] 

beq ControlKey 

"* Touche normale: affiche le caractere a 
I'ecran, ajoute le dans le buffer — 

*•* puis retQurne attendre 

No_Tabs Ida Pressed_Key 

and Masque_AND 

ora Masque_ORA 

pha 

»riteChar Affiche le caractere 



Ida Pressed Key 



Stocke 



Pom's n° 49 



le caraetere dsns la ligne 
Idy Char_Ptr 

iny Saute 
I 'octet de longueur 

shoctm We 
stocke que le caractere 
Biiff_Add_2 sta Buffer, y 

cpy MaxLength 

beq EOL 

longm 

Inc Line_Length le 
caractere a ete accepCe, la ligne 
Not_Larger inc Char_Ptr S'allonge 

Go Get Char brl Get Char- 



bra Go_Get_Char 
retourne attendre une frappe 



Et 



Controle: agit de facon adapzee. 

Control_Key cmp fSlB 

beq Escapade 
cmp 11$ OD 
beq EOL 

cmp *$oa 

beq LeftArrow 

cmp I $15 

beq Right_Arrow 

cmp »S7F 

beq Delete 



Escape ? 
CB ? 



<: — ? 
— > ? 
Delete? 



bne Go_Get^Char Si ce 

n'est rien de tout cela, frappe 

* Escape, alors on ne sauve rien et on va au 

menu 

Escapade sec Signale qu'on a fait escape 

Its 

' Fin de ligne signalee par un reCour chariot 

EOL Ida Chac_Ptr Signale 

la fin de ligne 

shortm 

Buff_Add_3 sta Buffer Met la 

longueur pour String 
longm 

clc La chaine est bonne 

rts 

• Flecbe a gauche, pour revenir en arriere d'un 

caractere 



Left_Arrov Idy Char_PCr 

est deja en debut de chaine 
beq Go_Get_Char 
on ne peut aller au dela... 

dec Char_Ptr 
d'un caractere a gauche 

Deplace_Curs Ida Pressed_Key 
le caractere en question 
pha 
MriteChar 
le quand eieme 



Si on 
Alors 

Revient 

Prend 

Afflche 



' Fleche a droits, pour avancer d'un caractere 

Si on 
Fleche 



i?ight_Arroii' Idy Char_Ptr 

est a la fin de la ligne, une 

cpy Line_Length 
a droits bippe 

bcc Avance 
elle avance dans la chaine 

_SysBeep 

bra Go_Cet_Char 

Avance inc Char_Ptr 

dans la chaine 

Ida t2B 

Space 

sta Pressed_Key 
bra Deplace__Curs 
deplacer le curseur a droite 



Slnon, 



Avance 
Forward 

Va 



• Pour I'instanC, delete agit comme la fleche a 
gauche (n'efface rien) 



Delete Ida 18 

une fleche a gauche 

sta Pressed^Key 
bra Left Arrow 



Simule 



• Sous-Routines de 1 'editeur de ligne 



• Attente d'une peu de temps (?l 



Pas defaut 
Sauvegarde Y 

II y a 



WaitAMoment Entry 
sec 
phy 

Idy »$C0O0 
HAL Ida >KBd 

eu une touche de frappee 

bmi PasAttendre 
dey 

bne HAL 

clc Si on a bien attendu 

PasAttendre ply Recupere Y 

rts 

* Donnees utiles a 1 'editeur de ligne * 
Pressed_Key ds 2 Code de la touche 

Char_Ptr ds 2 

Position du curseur dans la ligne 
Max_Length ds 2 Nombre 

maximum de caracteres 
Line_Lengtfi ds 2 Taille 

de la ligne 



Masque_AND ds 2 

pour coder ou non I'afflchage 
Masque ORA ds 2 



Hasque 
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Eraser.Macros 

MACRO 

tlab pushlang saddr, Saffset 

slab ANOP 
LCLC SC 
LCLC SBBST 

iC AMID saddr, I, 1 
AIF "sC'^'t", .imnedlats 
AIF "SC"-" I" , .zerapage 
AIF C:soffset^O, .nooffsst 
AIF ••Soffsef="s". .stack 
pushword iaddz+2, soffset 
pushword saddr, soffset 
tEXIT 
.nooffssc 
pushword Saddr+2 
pushMord Saddr 
MEXIT 
. Inmediate 

tREST AMID Saddr,2,L:saddr-l 
dc 11-SF4 •, 12' liRESTJ ;-16" 
dc II •SFA ', I2-SREST- 

. stack 

pushword saddr+2, s 
pushword Saddrt-2,s 
mXIT 
. zerapage 
Idy tsaffset*2 
pushuord Saddr, y 
Idy ISaffset 
pushword saddr^y 
MEND 
MACRO 

Slab pushword SSYSOPR 
Slab ANOP 

AIF c:sSYSOPR=0, .b 

LCLC SC 
SC AMID SSYSOPP". 1. 1 

AIF 

("SC~^"I"I .AND. fS:WNGA). .lime 
diats 

Ida SSYSOPR 

pha 

I^XIT 
.b 

pha 

mxlT 
.immediate 

LCLC SBEST 

LCLA SBL 
SBL ASEARCH "SSYSOFR", " 1 

AIF SBL>0, .a 
SBL SETA L:SSYS0PR*1 
.a 

SREST AMID "SSYSOPR", 2, SBL-2 

dc II' $F4-, 12' SREST- 

MEND 

t&CRO 
slab str Sstrlhg 
Slab dc 

il'l .-Sstring c'Sstring' 
MACRO 

Slab movslong Sfcom,itol, £to2 
Slab ANOP 

LCLC SC 

LCLC SREST 
SC AMID Sfrom, 1, 1 



SREST AMID Sfrom, 2, L : £frair-l 
AIF -SC"-^"!', .zeropags 
AIF C:sto2-0, .a 
AIF 

("stol-'-S") .or. fstol-'-x") .o 
I. ("seal'-"y"l , .indexed 
moveword Sfrom, Stol, Sto2 
AGO .b 
-a 

moveword Sfrom, Stol 
.b 

AIF "sC"^"t-, .iirmediate 
AIF C:sto2^0, .G 
moveword 
if romtZ, Stol+2. Sto2+2 
mXIT 
. c 

moveword Sfrom+2, Stol+2 

mxiT 

. itanediatB 

AIF C:Sto2'=0, .d 

moveword 
I ■'SREST, Stolt-2.Sto2*2 

MEXIT 
.d 

moveword t' SREST. StoH-2 
MEXIT 
. zeropags 

moveword Sfrom. Stol , Sto2 
Idy l&tol*2 
Ida sfrom. y 
sta Sto2*2 
MEXIT 
. indexed 
Ida sfrom, stol 
sta Sto2 
Ida Sfrom+2, Stol 
sta Sta2+2 
mUD 
MACRO 

Slab moveword sfrom, stol, sto2 
Slab ANOP 

LCLC SC 
SC AMID Sfrom, 1, 1 

Ait '■=■■! ■■, .zeropage 

Ida sfrom 

sta Stol 

AIF C;sto2^0, .a 

sta sto2 
■ a 

mxiT 

. seropage 

AIF Stol-^"0-, .b 

Idy tstol 

Ida Sfrom, y 

sta sto2 

MEXIT 
.b 

Ida Sfrom 

sta sto2 

MEND 

MACRO 
Slab longm 
Slab ANOP 

rep ttOOlOOOOO 

longa on 

tEND 

M/iCRO 
Slab shortm 
Slab ANOP 

sep tiOOlOOOOO 

langa off 



MACRO 
Slab _FNEntry 
slab Idx IS2103 

jsl SEIOOOO 

WEND 

MACRO 
Slab _ReadBParam 
slab Idx tSQC03 

jsl $E10000 

MEND 

MACRO 
Slab _^SysBeep 
Slab Idx 1S2C03 

Jsl SEIOOOO 

MEND 

MACRO 

slab _CET_D£V_NUM iparams 
Slab jsl SE100A8 

dc i2S20' 

dc i4"sparanis'' 

MEND • 

MACRO 

slab ERASE^DISK Sparams 
Slab jsl SE100A3 

dc 12S25- 

dc il-'sparams" 

MEND 

MACRO 

Slab _GET_VERSION Sparams 
Slab Jsl SE100A8 

dc 12"$2A" 

dc i^-'sparams" 

tEND 

MACRO 
Slab _D_INFO Sparams 
Slab Jsl $E100A3 

dc 12"$2C" 

dc i4"Sparants" 

MEND 

MACRO 
Slab _ReadChar 
Slab idx IS220C 

Jsl SEIOOOO 

MACRO 
Slab SetOutGlobals 
Slab Idx tSOAOC 

Jsl $£10000 

MEND 

MACRO 
Slab _ffriteChar 
slab Idx fSlSOC 

Jsl SEIOOOO 

MEND 

MACRO 
Slab _WriteCString 
Slab Idx tS200C 

Jsl SEIOOOO 

fEND 

MACRO 
s Jab _Int2Dsc 
Slab Idx 4S260B 

jsl SEIOOOO 

MEND 

MACRO 
Slab _Int2Hex 
Slab Idx IS220B 

jsl SEIOOOO 

mNO 
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Erase. CD A 



p4Hl(-i(jlAi*JtjFRit4i»Jf**«it*Jtp(-itAi»**iti*#**itJI«it*Att#i*j»ptil-i'it4 

- Effaceur v?, " 
It 

" (d Patrice Neveu, le 14 mars 1S90. * 

• * 

keep Eraser 

mcopy Eraser .Macros 



• Bloc d- identification du CDA 



Eraser Info 



CDA 



Start 

str ' Effac^ge' 



dc 14 '£i"dsei_ Jni t ' 
d'ovverture du CDA 

dc i4 'Ersser^ShutDawn ' 
de fermeture du COA 
End 



Horn du 
Adresse 
Adresse 



* Point d 'entree du CDA 

Eraser_2nit Start 

using Eraser_Data 



ZPsge gequ $0000 

KBD gequ $C000 

KBDSTRB gequ SCOlO 

phb We pas 

outlier de le depiler en sortant 

phk Data Bank = Program 

Bank 

plb Sans deranger la 

pile 



• Teste la version de ProDOS (B/16) 

' Demsnde quelle version de ProDOS 16 est appellee 



OS Kind 



equ $E100BC 



Ida >OS_Klnd 
and iSOOFF 
garde que 1 'octec interessant 
bne Kind OK 



He 



Write Err 



Pusl^Long l/PcoDOS_Err 
_WriceCString 



attend 



PvsfiWord iO 
line frappe au clavier 
PushWord HO 
_RBadChar 
pla 

brl Quitte 



Kind_Ol( ^Get_Version GetVersion Pm 

Ida CetVersion_Pm 
and IS7FFF 

cmp fSOlOl si 
c'est infer ieuTr alors Eraser ne 

bcs Goad_Vs Sera 

pss dans ProDOS. 



PushLong iVersion_Err 
bra Hrite_Err 

Gaod_Vs pha 
xba 

and tSOOFF 
pha 

PushLong tMajor^ Vs 
PushWord il 
PushWard HO 
_Int2Dec 

pla 

and l$O0FF 
pha 

PushLong iMinar_Va 
PushWord fl 
PushWord to 

_Int2Dei: 

Ida GecVersion_i'ra 
and fSaOOO 
bne Prototype 
Ida iS20 
tinale — > espace 

bra Proto 
Ida f80 



Version 



Prototype 
P 

Proto 



Version proto — > 



shortm 

sta Hlnor_Vs*l 
longm 



' Afficbage du cadre COA 



Open_CDA PushWord #0 

pour le resultst 

PushWord #Si9 
video de la Battery RAM 
^FeadBParam 
Ida »$2B00 
plx 

beq Videos a 
ora g$0014 
sta >$002D 



Place 
Mode 



Video 4 

Mask 
Mask 
5.0 



PushWord ISFF 

PusfiWord DSao 

_SetOutGl aba 1 s 

PushLong fEn^Tete 
_»riteCString 

PushLong iBords 
_WriteCString 

PushLong IEn_Quetie 
_WriteCString 



And 
Ora 
Pour GS/os 



' Demands quel volume on Efface 



Idy *0 Des 
espaces pour blanchir les buffers 
Ida »$2020 



CleaT_Path sta Devlce_Name. y 
St a Vol oroe_Name, y 
iny 
iny 

bcc ClearPath 

Ida l/$03Q2 
jsr Tab 
Idx *16 

Longueur maximsle d'un volume 
Ida IDeviae_Nanie 
clc 

jsr EdLine 
tics Quicte 

Ida HSOBOl 
jsr Tab 

PushLong SAsk_For_Voliirns 
_HriteCString 

Ida »SD902 
jsr Tab 
Idx §16 

Ida / Va luine_Nanie 
clc 

jsr BdLine * 
bcs Quitte 

MoveLong tBlank_Name, Neu_Nan!t! 

Ida Volume_fJains 

and iSOOFF We garde que la 



taille 



NeuName Ok 



beq NeuName_Ok 

MoveLong tVol ume_Name, New_Name 
Get Dev_NiJm GefLDevNuin_Pm 
D Info DInfo Pm 



_Era se^Disk Eraser_ Pm 
bcc Quitte 
jsr EzreuT 



Quitte le CDA 



Quitte plb 

qu'on a empile en entrant 
rtl 



Depi le ce 



' Sous-routines 



* Erreur 
■ 

£rreur 



bcc WD_£rr 
pha 

PushLong 4ASCXT_Code 
PushKord §4 
_Int2Hex 

Ida US 0602 



jsr Tab 

PushLong iErreur_Msg 
_WriteCSCring 

PushLong HO Attente d'une 

frappe au clavier 

_ReadChar 
pla 



Ho_Err 

fautlf 



rts 



Retovr av 



• Tab 

.__ 

Tab 



Ida »$FC22 

pha 

pha 

pha 

pha 

pha 
pha 
phtt 
pha 

_FVIEntry 

pla 

pla 

pla 

pla 

rts 



' Copie ici 1 'editeur de iigne 



copy Edhine 
End 



' Shut Down 



Eraser _ShutDo>in Start 
rtl 
End 

' Donnees 



Eraser_Data Data 

Device_Warae ds IS Commence par un ' . ' ou '/' 
Volu!iie_Name ds 16 Now danne par I'utilisateur 
Blank_Name str ' /Disque.Vide' Nam par defaut 
GetDevNum_Pm anop 

dc 14 ' Device_Name' / 
Paranietres de GetDei/Num 
DInfo_Pm anop I 

ds 2 I 
Eraser_Pm anop 

Parametres de Dlnfo 

dc i4 ' Device^Name ' 
New_Nan}e dc i4'Blank_Naine' I 

dc i'l' I 
Parametres de Eraser 



I 
I 

I I 



GetVersion Pm ds 2 



Byte 0: Minor Release 
Byte J: Major Release 



20 
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dont MSB= 1 far prototype jrelsssss 



CSOUP 

NORM 
INV 

FF 

FS 



egu 24 

equ 2 7 

eqii 14 
equ 15 

equ 12 
equ 28 



; caracteres normaux 
; souris 

; normal 
I inverse 

! equivalent de HOME 



Erase. Recap 

Apres avoir saisi ces codes sous moniteur, 

vous Us sauvegarderez par : 

Creole Erase J$b9 

Bsave EraseA$2000^2560.T$B9 

Ce fickier est a metire dans voire dossier : 

IDesk.accs 



deplace d'ua caractere a draite 


00/2000:05 


00 


00 


00 


00 


00 


00 


00 






\JJ 


nn 


U \J 


00 


OA 


04 


01 


RC equ 7 7 : M 


00/2010:00 


00 


01 


00 


00 


00 


00 


00 


($4D= 77) retaur chariot 


00/2018:00 


00 


DO 


00 


00 


00 


00 


00 


BAHD equ 90 ! Z 


00/2020:00 


00 


01 


00 


00 


00 


00 


00 


(S5A= 901 barre a droits 


00/2023:20 


00 


40 


00 


20 


20 


20 


20 


3ARG equ 95 ! 


00/2030:20 


20 


20 


20 


20 


20 


20 


20 


(S5F= 95) barre a gauche 


00/2038:20 


20 


20 


20 


20 


20 


20 


20 




00/2040:F2 


5F 


05 


00 


00 


03 


45 


66 


En Tete dc il ' FF, CNORM, NORM' , c' ',38c' ', c ' ' 


00/2048: se 


61 


63 


61 


67 


65 


11 


00 


dc 


00/2050: 00 


00 


FD 


02 


00 


00 


BB 


4B 


11 'INV, CSOUR, BARD, CNORM, NORM', C ' Bffacage 


00/20S8:AB 


AF 


BC 


00 


El 


29 


FF 


00 


1/2.0 ' 


00/2060:00 


IE 


F4 


00 


00 


F4 


F9 


04 


dc 11 'INV 


0D/2O68:A2 


OC 


20 


22 


00 


00 


El 


F4 


dc 10c' ' 


00/2070:00 


00 


F4 


00 


00 


A2 


OC 


22 




nO/P078-P2 


00 


00 


El 


68 


82 


40 


01 


M3jor_Vs dc C . ' 


00/2080:22 


A8 


00 


El 


2A 


00 


3B 


03 


Minoir^Vs dc c' ' 


00/2088:00 


00 


AD 


3B 


03 


29 


FF 


7F 


dc il'CSOUR'.il'BARG' 


00/2090:C9 


01 


01 


BO 


08 


F4 


00 


00 


dc ll'BARD'.39i-i-BARH',il'BARG- 


00/2098 :F4 


19 


05 


80 


CB 


48 


EB 


29 


dc h '00- 


00/20A0:FF 


00 


48 


F4 


00 


00 


F4 


8F 


bar da dc 


00/20A8:03 


F4 


01 


00 


F4 


00 


00 


A2 


il 'INV, CSOUR, BARD', 3Sil -FS',!! 'BARC 


00/2030:03 


26 


22 


00 


00 


El 


SB 


29 


dc 


oo/2aaa:FF 


00 


48 


F4 


00 


00 


F4 


91 


il 'INV, CSOUR, BARD', 38il 'FS', il "SAflG' 


00/20C0;03 


F4 


01 


00 


F4 


00 


00 


A2 


dc 


00/20C8:0a 


26 


22 


00 


00 


El 


AD 


3B 


11 'INV, CSOUR, BARD-,3Sil 'FS',il - BARS' 


00/2000:03 


29 


00 


80 


DO 


05 


A9 


20 


dc 


00/20D8:00 


80 


03 


A9 


50 


00 


E2 


20 


il - INV, CSOUR, BARD', 3911 -FS'.il 'BARO- 


00/20EO:3D 


92 


03 


C2 


20 


F4 


00 


00 


dc 


00/20E8:F4 


19 


00 


A2 


03 


OC 


22 


00 


11 • INV, CSOUR, BARD' ,3Bil 'FS',!! 'BARC 


O0/2OFO:00 


El 


A9 


00 


28 


FA 


FO 


03 


dc h'OO' 


00/20FB:09 


14 


00 


BF 


20 


00 


00 


F4 


En_Oueue dc il 'BARD,CNORM.N0RM' 


00/2100 :FF 


00 


F4 


80 


00 


A2 


OC 


OA 


dc c' Nam de Device ou de Volume puis 


00/2108:22 


00 


00 


El 


F4 


00 


00 


F4 


dc 11 ' INV, CSOUR. RC 


00/2 110: 3D 


03 


A2 


OC 


20 


22 


00 


00 


dc 411 'FS', il 'BARG- 


00/211 8 lEl 


F4 


00 


00 


F4 


BF 


03 


A2 


dc i 1 ' CNORM, NORM c ' 


00/2120 :0C 


20 


22 


00 


00 


El 


F4 


00 


',11 - INV, CSOUR ', 38 il 'BARH' 


00/2128:00 


F4 


92 


04 


A2 


OC 


20 


22 


dc il'CNORM,NORM' .h'OO' 


00/2130:00 


00 


El 


AD 


00 


00 


A3 


20 


Erreur Msg dc c'Erreur S' 


00/2138:20 


99 


FE 


02 


99 


OE 


03 


ca 


ASCII_CodB ds 4 


00/2140:C8 


CO 


10 


00 


90 


F3 


A9 


02 


dc h '00- 


00/2148:03 


20 


B2 


01 


A2 


10 


00 


A9 




00/2150:FE 


02 


18 


20 


CD 


01 


BO 


68 


PraDOS Err dc h'OC'.c' Desole, 11 me faut 


00/2158:A9 


01 


08 


20 


B2 


01 


F4 


00 


ProDOS 16. ■ .h'OO' 


00/2160:00 


F4 


34 


05 


A2 


OC 


20 


22 


Version_Err dc h'OC',c' ProDOS 16 v} . 1 ou 


00/2168:00 


00 


El 


A9 


02 


04 


20 


B2 


apres. ' ,h'00' 


00/2170:01 


A2 


10 


00 


A3 


OE 


03 


18 


Ask For Volume dc c' Nouveau nam de Volume puis 


00/2178:20 


CD 


01 


BO 


43 


A9 


IE 


03 


t 


00/2180:80 


35 


03 


A9 


00 


00 


8D 


37 


dc il' INV, CSOUR. RC • 


00/2188:03 


AD 


OE 


03 


29 


FF 


00 


FO 


dc il ' CNORM. NORN ' ,c' 


00/21 90 :0C 


AS 


OE 


03 


BD 


35 


03 


A9 


dc h'OO' 


00/21 98: 00 


00 


8D 


37 


03 


22 


AB 


00 




00/21AO:E1 


20 


00 


2B 


03 


00 


00 


22 


End 


00/21A8:A8 


00 


El 


2C 


00 


2F 


03 


00 




00/2180:00 


22 


AS 


00 


El 


25 


00 


31 
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21 



00/2138:03 00 00 90 03 20 7D 01 
00/21C0:AB 6B 90 32 48 F4 00 00 
00/21C8:F4 F4 04 F4 04 00 A2 OB 
00/2100:22 22 00 00 £1 A9 02 06 
00/2108:20 32 01 F4 00 00 Fi EC 
00/21E0:0't A2 OC 20 22 00 00 El 
00/21E8:F4 00 00 F4 00 00 A2 OC 
00/21F0:22 22 00 00 El 68 60 8F 
00/21FB:24 00 00 A9 22 FC 48 48 
00/2200:48 48 48 43 48 48 A2 03 
00/2208:24 22 00 00 El 68 68 68 
00/2210:68 60 08 AO FF FF BC F9 
00/2218:02 9C FB 02 28 90 09 AO 
00/2220:58 00 8C FB 02 9C F9 02 
00/2228:8E F5 02 8D lA 02 BD SC 
00/2230:02 BD Al 02 9C F3 02 9C 
00/223e:F7 02 AF 00 CO 00 30 40 
00/2240:A9 5F 00 48 A2 OC IB 22 
00/2248:00 00 El F9 08 00 A2 OC 
00/2250:18 22 00 00 El 20 EO 02 
00/2258:AC F3 02 C8 B2 20 B9 CD 
00/2260:01 C2 20 2D F9 02 OD FB 
00/2263:02 48 A2 OC 18 22 00 00 
00/2270:El F4 08 00 A2 OC 18 22 
00/2278:00 00 El 20 ED 02 90 BA 
00/2280:AF 10 CO 00 C2 20 29 IF 
00/2288:00 80 Fl 02 C9 IF 00 90 
00/2290:32 C9 IF 00 FO 2D AD Fl 
00/2298:02 2D F9 02 OD FB 02 48 
00/22AO:A2 DC IB 22 00 00 El AD 
00/22A8:F1 02 AC F3 02 C8 E2 20 
00/22B0;99 CD 01 CC F5 02 FO 28 
00/22B8:C2 20 EE F7 02 EE F3 02 
00/22C0:82 77 FF C9 IB 00 FC 16 
00/22C8:C9 OD 00 FO 13 C9 08 00 
00/22D0:F0 lA C9 15 00 FO 2A C9 
00/22D8:7F 00 FO 41 DO E2 38 60 
00/22EO:AD F3 02 E2 20 BD CD 01 
00/22EB:C2 20 IB 60 AC F3 02 FO 
00/22F0:CF CE F3 02 AD Fl 02 48 
00/22F8:A2 OC 18 22 00 00 El 80 
00/2300:BF AC F3 02 CC F7 02 90 
00/2308:09 A2 03 2C 22 00 00 El 
00/2310:80 AE EE F3 02 A9 IC 00 
00/2316:80 Fl 02 80 D7 A9 08 00 
00/2320:80 Fl 02 80 C7 38 5A AO 
00/2328:00 CO AF 00 CO 00 30 09 
00/2330:88 DO F7 18 7A 60 00 00 
00/2338:00 00 00 00 00 00 00 00 
00/2340:00 00 6B 00 00 00 00 00 
00/2348:00 00 00 00 00 00 00 00 
00/2350:00 00 00 00 00 00 00 00 
00/2358:00 00 00 00 00 00 00 00 
00/2360:00 00 00 OC 2F 44 69 73 
00/2368:71 75 65 2E 56 69 64 65 
00/2370:FE 02 00 00 00 00 FB 02 
00/2378:00 00 IE 03 00 00 01 00 
00/2380:00 00 OC 18 OE 20 5F 5F 
00/238a:5F 5F 5F 5F 5F 5F 5F 5F 
00/2390:5F 5F 5F 5F 5F 5F 5F 5F 
00/239B:5F 5F 5F SF 5F SF SF 5F 
00/23AO:5F 5F 5F 5F 5F 5F 5F 5F 
00/23A8:5F 5F 5F 5F 20 OF IB 5A 
00/23B0:lB OE 20 45 66 66 61 63 
00/23B8:61 67 65 20 76 32 2E 30 



00/23C0:20 OF 20 20 20 20 20 20 
00/23C8:20 20 20 20 50 72 6F 44 
00/23D0:4F 53 20 76 20 2E 20 20 
00/23D8:20 IB 5F 5A 4C 4C 4C 4C 
a0/23E0:4C 4C 4C 4C 4C 4C 4C 4C 
00/23E8:4C 4C 4C 4C 4C iC 4C 4C 
00/23F0:4C 4C 4C 9C 4C 4C 4C iC 
00/23F3:4C 4C 4C 4C 4C 4C 4C 4C 
00/2400:4C 4C 5F 00 OF IB 5A IC 
00/240B:lC IC IC IC IC IC IC IC 
00/2410:1C IC IC IC IC IC IC IC 
00/2418:1C IC IC IC IC IC IC IC 
00/242Q:lC IC IC IC IC IC IC IC 
0Q/242B:1C IC IC IC IC 5F OF IB 
00/2430:5A IC IC IC IC IC IC IC 
00/2438:lC IC IC IC IC IC IC IC 
00/2440:lC IC IC IC IC IC IC IC 
00/2448:lC IC IC IC IC IC IC IC 
00/2450:lC IC IC IC IC IC IC 5F 
00/2458:0F IB 5A IC IC IC IC IC 
00/2460:lC IC IC IC IC IC IC IC 
00/2468:lC IC IC IC 2C IC IC IC 
00/2470;lC IC IC IC IC IC IC IC 
00/247a:lC IC IC IC IC IC IC IC 
00/2480:lC 5F OF IB 5A IC IC IC 
00/248B:lC IC IC IC IC IC IC IC 
00/2490:lC IC IC IC IC IC IC IC 
00/2498:1C !C IC IC IC IC IC IC 
O0/24A0:lC IC IC IC IC IC IC IC 
00/24AB:lC IC IC 5F OF IB 5A IC 
00/2430:lC IC IC IC IC IC IC IC 
00/24B8:1C IC IC IC IC IC IC IC 
00/24C0:lC IC IC IC IC IC IC IC 
00/24C8:lC IC IC IC IC IC IC IC 
00/24D0:lC IC IC IC IC 5F 00 5A 
00/2108:18 OE 20 4E 6F 6D 20 64 
00/24E0:65 20 44 65 76 69 63 65 
00/24E8:20 6F 75 20 64 65 20 56 
00/21F0:6F 6C 75 6D 65 20 70 75 
00/24FS:69 73 20 OF IB ID IC IC 
00/2500:1C IC 5F 18 OE 20 OF IB 
00/2508:4C IC 4C «C 4C 4C 4C 4C 
00/2510: 4C 4C 4C 4C 4C 4C 4C 4C 
00/2518;4C 4C 4C 4C 4C 4C 4C 4C 
00/2520:4C 4C 4C 4C 4C 4C 4C 4C 
00/2528:4C 4C 4C 4C IC IC 18 OE 
00/2530:00 45 72 72 65 75 72 20 
00/2538:24 00 00 00 00 00 OC 20 
00/2540:44 65 73 6F 6C 65 2C 20 
00/2548:69 6C 20 60 65 20 66 61 
00/2550:75 74 20 50 72 6F 94 4F 
00/2558:53 20 31 36 2E 00 OC 20 
00/2560:50 72 6F 44 4F 53 20 31 
00/2568:36 20 76 31 2E 31 20 6F 
00/2570:75 20 61 70 72 SS 73 2E 
00/2578:00 20 4E 6F 75 76 65 61 
00/2580:75 20 6E 6F 6D 20 64 65 
00/2588:20 56 6r 6C 75 60 65 20 
00/2590:70 75 69 73 20 OF IB 40 
00/2598:13 OE 20 20 20 20 20 20 
00/25A0:20 20 20 00 F5 04 00 09 
00/25A8:00 11 00 F5 04 00 OO 00 
00/25B0:FD 02 F5 02 FO IB 00 F9 
00/25BB:04 F5 02 00 21 00 F9 04 
00/25C0:F5 04 00 41 00 3B 03 F5 
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Traitement de texte franpais 

Pour Apple lie, Apple lie. Apple GS. 



Frappe au kilometre, rapidite d'ecriture, souplesse de correction. 
Glossaire puissant, recherche ■ remplacement. 
Creation de caracleres telechargeables sur Image Writer 

(notation mathematique, alphabets strangers etc,.,) 
Impression rapide, pilotage precis de mise en page, 
Coupure correcte des mots, justification en proportionnel, 

condense et expanse. 

Gribouille, une valeur sure pour un public averti. 

Pour recevoir Gribouille, envoyez ce bon de commande a: 

Je vous prie de m'envoyer a I'adresse ci-dessous; 

Norn: 

Adresse; 

le logiciel Gribouille Prix (port compris) 

■ version //e-//c pour lecteurde disquetles 5 1/4 599 fr H.T. 710 fr T.IC. 

• version lie - lie pour ledeur de disquetles 3 1/2 632 tr H.T W IrllC. 

• version GS 835 fr H.T 990 fr TIC, 

Ci-joinl un cheque de francs libellfi S i'ordre de GRIBOUILLE SARL 



Format 

Les sources de 
Format.CDA ^tanl 
quasimeni iden- 
tiques aux sources 
d 'Erase. CD A, 
nous avons pr6f6r6 
ne pas les publier 
pour consacrcr nos 
colonnes a d'au- 
ires programmes 
ou articles. 

Vous trouverez 
done les fichiers, 
ressource.S, Edline 
et Format.CDA 
ainsi que I'objet 
executable dans le 
sous-catalogue 
/Format de la dis- 
quette Pom's 49. 

Les fichiers corres- 
pondants pour 
Erase seront, eux. 
plac6s dans le 
sous-catalogue 
/Erase. 
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Jean OCCion 




Font.Codes.l est destin6 aux utilisaieurs du tandem-logiciel 
AppleWorks et TO.SuperFonts perdus dans le dedale des codes a 
inserer au texte pour obtenir un caractere qui sort un lant soil peu de 
I'ordinaire. 



Font.Codes.l est un fichier texte 
AppleWorks qui, imprimd avec TO. 
SuperFonls, permet de voir les 
caractferes d'une police donnde en 
reference sous la forme d'un tableau, 
oil chaque caractere est prdsenifi associd 
& son code ASCII, decimal, hexa- 
d&imal, et au caracl6rc S utiliser dans 
AppleWorks, en I'associant aux 
commandcs <a2> ou <x3> de 
TO.SuperFonts. pour pouvoir impri- 
mer le caracltre de reference. 
II est iniSressant de se "personnaliser" 
quelques polices en les compiitanl, au- 
dessus du code 128, par des caraclferes, 
symboles, logos ou Icones, doni on a 
souvent bcsoin. Cela permet d'avoir 
moins de polices k charger. Mais le 
nombre de ces caracteres nouveaux 
augmeniani, les moycns mn6mo- 
techniques pour se tes lemdmorer 
diminuenL 

Imprimer Font.Codes.l avec ces 
quelques fonles vous permeitra d'avoir 
les Equivalences clavier completes 
sous les yeux. 

Comment s'en 
servir ? 

Une fois imprimd ce tableau (sur la 
disquette n° 49). on rcpfcre facilcment 
I'icSne "Gertrude" et Ton voit que 
poor I'lmprimer il faudra insurer dans 
le texte la sequence <x3>g<xi >. 

D'aulre part, lorsqu'on veut completer 
une police avec un dditeur, pour la 
franciser par cxemple, il est ir&s facile 
de repdrer 5 la place de quel code i] faul 
placer tel caractere acccniufi. 

Exemple : pour ^diier un "6", on 
trouvera tout de suite que c'est & la 
place du caracii^re dont le code ddcimal 
est "142" qu'il faul copier le "c" pour 
le complfiter. Faute de quoi, un Trai- 



lement de lextcs doui de la capacitc de 
franciser, comme TO.SuperFonts, 
risque de ne pas s'y retrouver. 

Le tableau 

Sous chaque caraclfcre, on trouvera : 

Icre ligne, le code ASCII de- 
cimal : 

* 2eme ligne, Ic code ASCII hexa- 
difcimal ; 

¥ 3emc ligne, Ic caract6re k uiiliser 
avec AppleWorks. 

Nole : sur ceite Iroisieme ligne. 
certains caracteres soni suivis 
d'une barre de division et d'un au 
deux auires caracteres, signifiant 
que I'on pourra utiliser, soil le 
caractere situ^ d gaucfte du / en 
I'associanl aux commandes <x2> 
ou <x3>, soil le caractere siiu4 d 
droile, en I'associant d la 
commande de "francisatian" <fd> 
de TO.SuperFonts. 

Comment 
proceder ? 

H Inscrire tout cn haul du fichier 
Font.Codes.l, en police nu- 
mcro 1, la police utilisiSe pour les 
codes (dans I'exemple : SHASTON. 
F1X.08). 

Note : n'uiilisez pas une police trap 
large (maximum 12 points). Une po- 
lice non proportionnelle. dont la 
largeur des caracteres est constante. 
donnera une meille we presentation. 
¥ Inscrire en police numfiro 2 la 
police de rfifirence (dans I'exem- 
ple : VENICE.28). 

Note : it est recommand4 de ne pas 
depasser une largeur maximum de 
37 points. Toulefois lorsqu' un 
caractere depasse celte limite, il sera 



imprimi. mais le suivani lui 
"marchera dessus" ; cependant. cela 
ne gdne pas forcement la lisibilill du 
tableau. En revanche, si ce caractere 
Crop large se irouve en bout de Ugne, 
il sera imprimi "d la Ugne" et la mise 
en page du tableau sera detruiie. 
Dans la police BASEL. 48, par 
exemple, si le "O" n'avait fait que 37 
points de large au lieu de 40, il scrail 
iesi& k sa place, au lieu de passer a la 
ligne. Les autres sont correctement 
imprimds, mcmc iSiant plus larges (le 
"M" fait 49 points). 

t Inscrire dvcniuellcmcnt le litre de 
la fonie de reference. La mise en 
page est libre dans le sens de la 
hauteur, c'est-S-dire quelle est ^ orga- 
niser en fonction des dcsirs, de la 
longueur des pages ct de la hauteur des 
polices. Mais il ne faut rien changer 
dans le sens de la largeur, a savoir la 
largeur du chariot (= 8) et les marges 
gauches eidroiies (= 0). 
D'aucuns rcmarqueront dans le texte 
(passionnant) quelques repetitions ou 
espaces inutiles. lis permettent 
seulcment de ne pas couper en fin de 
ligne une commande dc tabulation de 
TO.SuperFonts, ce qui en gdnfiral 
donne de mauvais rdsultats. 

Pour finir, un true 

Pour faire lenir I'ensemble d'un 
tableau sur une page 21 x 29,7, uti- 
liser une police de reference taillc 24 et 
une police de code taille 7. 

Exemple : TIMES.24 et COURIER.? 
cn demandant la quality supSrieure k 
I'impression, avec C0URIER.14 "en 
ligne". 

Remarque : Etant donnie la longueur 
des tableaux, nous n'avons pas pu les 
publier en exemple. Vous les 
trouverez done sur la disquette 
d'accompagnemeni de la revue n°49 
sous les noms /font. codes, i et 

/FONT. CODES. 3. 
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^imitri Qeystor 



Voici aujourd'hui un programme, Budget Facile, qui pourrait grandement 
simplirier la vie aux personnes qui n'adorent pas consacrer le dimanche aux 
comptes familiaux. Et, pour tirer pleinement parti des nouvelles qualites 
d'AppIeWorks 3.0, un "micro-programme" destin^ au trailement de texte et un 
TimeOut, To.Debug, offrent un complement naturel a UltraMacros 3. 



Lcs ensembles de macros correspondanls pour AppleWorks 1.4 
sonl d6jJ panis dans des nuin6ros prdc£dents de Pom's, ci vous 
pourrez vous y reporter si la comparaison vous inecrcsse. Les 
macros que Pom's vous propose aujourd'hui lireni pari! des 
nouvelles commandes des versions 3, ellcs ne sonl done plus 
compaiibles avcc AppleWorks 1.4. 



Budget.Facile 



C'csL une version eniieremenl revue. Elle [ire largement pani 
des nouvelles possibililds d' AppleWorks 3.0, en pariiculier 
pour ce qui est des menus el de la facility d'emploi. filant 
donn^ rimporiance de cctic application, les (ichiers qui ia 
composcnt sonl rassemblds dans le dossier budget. 

Le programme est g6r6 automat iquemcnt par deux fichiers 
Task, BUDGET et bud. bis. Recopiez-les sur votre disquc de 
dcmarrage AppleWorks, celui qui contienl le fichier 
ULTRA. SYSTEM. Recopiez sur voire disque de donnces — cclui 
oCi AppleWorks liiysauvc habitucllcment ses fichiers — les 

fichiers MEHU, MODELE, LIVRE, LISTE el 3UIV1. En cinq 

minutes, c'esl fail, et Budget.Facile est pret i fonctioiincr. 11 
peut eire lancfi depuis AppleWorks en passant par I'oplion 
Macros Options du mcnu TimeOut, ou directemcnt i partir 
d'un sSlccteur. Le programme charge de lui-mfime lous les 
fichiers dont il a besoin, el en assure automatiquement la 
sauvegarde une fois que vous avez fini d'y travailler. 

Budget. Facile jusiifie plcincmcni son nom : cinq autres 
minutes pour lire le dSbui de la documcniaiion (incluse sur la 
disquette), et vous eies pard pour commencer S travailler. Les 
operations sont piloldes par deux menus, et sur chaque &ran 
apparatt un message pour indiqucr les gesies I Taire. 
Budgci.Facile peniie! de gerer 6 comptes (banques, canes de 
cnSdil, espfices), 7 categories de revenus el 23 categories de 
dcpcnses. Des noms de categories directemenl utilisables sonl 
proposes par dSfaui sur le fichier models, mais vous pouvez 
faciicmeni atlribuer d'autres noms qui conviendraient micux i 
vos besoins, ime petite macro uiilitaire est lit poiu* vous aider. 

L'£cTan de travail oii vous faiies la saisie des operations 
coniient dans sa panie superieure une fenetre oil s'affichent en 
permanence les 36 soldes courants de vos comptes dcpcnses el 
revenus, plus le total des avoirs el le revenu nel. C'cst la 
principale originality de Budget.Facile : vous pouvez en 



quclque sortc surveiller revolution de vos finances en "lemps 
reel". Lc fichier de travail est un fichier mensuel, et il vous 
donne la "phoiographie" de vos depenses et de vos revenus du 
mois courant ; etanl donne que le report des avoirs se fait 
automaiiquemeni d'un mois sur I'aulre, les soldes des comptes 
aflichcs sont constamment tenus k jour. 

Pour que la "photographic" soil fidele, BudgeLpacilc salt non 
seulement transcrire des operations simples, mais aussi 
vcniilor une operation entre divers postes. Avez-vous paye dans 
urc grande siuface -avec un seul cheque- I'achat d'un manteau, 
d'un disque et de vos courses alimemaires 7 Qu'i cela nc 
tienne ; en une seu!e opdralion Budget.Facile debitera 
globalemenl votre compte en banque, mais repartira les 
ddpcnses entre les postes Vilemenls, Laisirs el Aliments. II 
suffit de pointer et cliquer avec la souris sur les categories en 
question, il est inutile de retapcr chaque nom de categorie. 

DarK le nouveau Budget.Facile, la saisie des montanls venliies 
est encore plus souple que dans la version precedenie : pour 
lermirer la saisie, il esi inutile de ealculer le dernier montant 
particl ; on sc contcnte de valider le Reste qui est affiche & 
I'ecran. Dans I'exemple precedent, on lapera le montant du 
cheque, le montant du manteau et le montant du disque i 
Budget. Facile attribuera automatiquement le resle au poste 
Alimenls. 

A tout moment, un message guide I'utilisaleur. Les 
commandes sont ultra-simples el consistent ^ laper sur la 
louche suggiree : Retimi pour commencer la saisie, K pour 
recalculcr. P pour imprimer. S pour sauver. Esc pour revenir 
au Menu. 

Souhaiiez-vous consulter ou supprimer des ecritures ? La liste 
des ecritures du mois courant est imraediatement accessible i. 
panir du Menu. On peut la consulter en y promenant la souris. 
imprimer im ecran ou louie la Hste, eventuellement supprimer 
deslignesd'ecriturcct sauvegarderle fichier, 

Le passage du mois courant ^ un nouveau mois est automa- 
tise : BudgcLFaciie se charge du report de soides des comptes. 
Si vous le lui demandez, il fera aussi ^ votre place le report des 
ecriiurcs du mois dans une Base de donnees gdnerale livre, el 
dans im tableau armuel suivi. Ce tableau annuel calcule 
automatiquement les valeurs moyennes et les valeurs curauiees 
de chaque categorie. Une colonne voisine est reservee c6te 
des moyennes) pour vos eslimaiions budgetaires. Le tableau 
csi imprimable sur double page, c'cst une nouveauli 
AppleWorks 3.0. 
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La Base g6idrale livre serl & fairc des poiniages. D exisle 
aussi ime Base de donnfies "de Iravaii". oil vous pouvez copier 
lotalitd ou pariie des Ventures d'un mois. 

Le tout est g£r^ sans souci et automatiqucmenl. Enire auires 
choscs, BudgetFacite offre de grandes facilit6s d' impression. II 
suffii d'appuyer sur quelques touches -clairement indiquiSes sur 
des menus successifs- pour imprimcr les donn&s de li vre et 
LiSTE \ rdcian ou sur papier. Vous avez Ic choix entre une 
listc g£n6rale, ou des s^leclions par categories : c'est 
Budget. Facile qui fail le iravail, et vous n'avcz besoin de 
rocourir & aucime commande d' AppleWorks. 

Lcs utLlisateiirs dc rancienne version de Budget.Facile seront 
agriablement surpris par les innovations de la version AW. 3. 
En paniculier, le nouveau fonnai du fichier modele permet des 
reports plus rapides (ne plus utiliser lcs fichiers de I'ancien 
BUDGET, bien enlendu !). et le Presse-papiers d'AppIeWorks 
3.0 n'est plus limiiS 4 250 lignes. 

Budget.Facile darjs voire Apple //, c'esi I'assurance, au prix dc 
quelques minutes d'atteniion quoiidienne, d'avoir toujours des 
finances claires et S jour... 



Un nouveau jeu de 

macros pour 
Traitement de Texte 



Comme promis, voici les macro- commandes pour Traitement 
de Texte. revues et adaptSes pour le nouvel AppleWorks 3.0. 

La disqueite Pom's contienl 3 fichiers : 

»• Ic fichier source macros, rorj, format TdT AppleWorks ; 

Ic fichier Task TDT3, ce soni lcs mEmes macros sous 
forme compilfe, et pretcs ^ lancer ; 

imc application TimeOul to. aide. tot. aW3, a copier 
dans le dossier des applications TimeOut pour pouvoir la 
consulier — quand les macros sont actives — en tapant 
Option-?. 



TO. Debug 
version frangaise 



TO.Dcbug est indispensable pour vous faciliier la vie lors de 
Tccriturc de macro-programmes, Elle donne h lout moment les 
indications suivanies : 

Fi che si qna leti que 

Voir vazi^bles numezigues 

Voir variables chalnes 

Voir noms des macros actuelles 

ttanl donnS que le nouvel UltraMacros permet de disposer de 
huit jeux disiincis de variables que vous siockez ou appclez 
avec les instructions <putvar NUM> el <getvar NUM>, Ic 
nouveau Debug indique aussi le numero du jeu de variables 
aciif. 



!ApptefWork§ : 

^ndy Brandt, (Dimitri Qeystor 

Les lecteurs de Pom's connaissent bien 
Randy Brandt. Createur de 
SuperMacroWorks et d'UltraMacros, il est 
aussi Tun des co-auteurs du nouvel 
AppleWorks 3.0. 

Dans le numero de juin 90 d'AppleWorks 
Forum, Randy publiait un premier article 
dans lequei il decrivait les mecanismes de 
demarrage d'AppIeWorks 3,0, A la 
demande de ses lecteurs, Pom's en 
propose ici une adaptation fran^aise. 

Naguere, pour &rire ses macro-langagcs, il avait fallu que 
Randy desassemble et ddcryplc par lui-mcmc le code 
d'AppIeWorks, qui fiiait un secret jalousement gardS. Ce 
tour de force n'est pas a la porifc du premier vcnu. D'autres 
pourtant ont fait comme lui, en pariiculicr Daniel Liirot, 
auicnr dc la version ftancis6e d'AppIeWorks 3.0. auqncl lcs 
Iccicurs de Pom's doivenl loutes les versions franfaises de 
CCS complements inldgr^s k AppleWorks que soni lcs 
logicicls de la s6ric TimcOuL 

Ainsi. peiii & petit, le voile s'est lev^ sur la face cach6e 
d'AppIeWorks. La maison Claris a ddsormals mis dans le 
domainc public des "Notes techniques sur AppleWorks" qui 
tnumcrcnl les adresses d'acccs aux diverscs routines internes 
d'AppIeWorks 3.0 ainsi qu'unc note qui d&rit la structure 
sur disque des fichiers AppleWorks. Ceux que ces notes 
inicressent peuvent lcs commander aupr&s d'AppIeWorks 
Forum, I'associaiion amiricaine des uiilisateurs 
d'AppIeWorks pour le prix modique de 12 S US (voir 
I'encadrd, page 17 du n° 48 dc Pom's). 



Sur la disquette n° 49 

Dans le dossier /AppleWorks^ vous irOuverez : 
»* BUDGET.FACILE, version AW 3.0 ; 

»* Un fichier de macros format TdT AW 3.0 : 
MACROS. TDT3, accompagniS du fichier Task 
TDT3, qui sonl les mfimcs macros sous formes 
compil6e ; 

»* Le TimeOut TO.AIDE.TDr.AW3 ; 
»- TO. DEBUG AH 3.0. 
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Le demarrage 



II y a irois fa?ons diff^renles de ddmairer AppleWorks : 

— lancer la disquctie "Startup" d'AppleWorks ; 

— utiliscr un "sSlccicur" (c'csl-^-dire un logiciel lanceur de 
programmes plus ou moins sophisliquS) ; 

— laper la commande voulue & panir du Basic Applesoft. 

Mais quelle que soil voire mSlhode, AppleWorks suivra 
loujours la mcmc procedure pour aciivcr le programme. Le 
pr4senl article d&ril cc qui sc passe entre ic momeni oii 
vous donnez I'ordre de demarrage, ci celui oii Apple- 
Works, aprts s'clrc chargd cn mcmoirc, affichc son premier 
menuarecran. 

ProIX)S 8 esi le sysiime d 'exploitation dc voire Apple en 
mode 8 bits. Lorsque vous dcmarrez ^ partir d'une disquelte 
qui condcm ProDOS, cclui-ci se charge d'abord lui-mSmc 
en mcmoire (c'esi le fameux "bool", raccourci de "lo lift 
oneself by one's boot-straps", liltSralemcnl "se souScvcr du 
sol en lirani sur ses laceis de chaussure"), puis ProDOS re- 
cherche le premier fichier du catalogue dont Ic nom se 
tcrmine par .system, el le dfimarre S son tour. 

Dans le cas d'une disquelte AppleWorks non modifide, ce 
flChicr sc nomme Aplwarks. system, 

Quand vous ajoutez UllraMacros a voire AppleWorks, cclui- 
ci dfibaplise Aplworks .Systsm en Aplworks .Sys, Cl 

insialle un nouveau fichier nomme ultra. system ; c'est 
done ce dernier que ProDOS fera dfimarrer en prioriic, et 
Ultra. System & SOn lOUr dfimaiTera Apl wor*:s.5ys. 

Si vous diSmaiiez k partir d'un s^lecteur de programmes ou 
avec une commande Applesoft, cela signific que : 
® ProDOS est dSja install^ cn m6moire ; 

© c'est vous qui d&idez quel fichier sera tanc6 ; par 
exemple, vous pourre? soil lancer Apiworks .sys 
— ce qui aura pour effei de dcmarrer un AppleWorks 
normal — soil lancer uicrs . system (qui demarrera 
UltraMacros, puis AppleWorks). 

Des utiliiaires de ddmanage complexes comme ProSel vous 
permellenl de lancer en chapclcl plusicurs programmes 



dilffirents : par exemple configurer d'abord un RAM disque 
avant de lancer AppleWorks. 

Le fichier Apiworks. system contienl le code de dfimarrage 
d'AppleWorks, mais aussi une bonne partie des principales 
inslruciions internes de controle d'AppleWorks, y compris 
ies routines U4cs au clavier et k I'affichage fcran utilises 
par les divers modules du programme. 

En effet, AppleWorics est un programme d'une telle ampleur 
qu'il est hors dc question de le faire tenir en entier dans la 
mdmoire d'une machine de 128Ko. II recourt done k la 
technique des "overlays", c'esi-S-dire qu'il charge k lour de 
role — et scion les besoins — lelle ou telle pariie du 
programme principal. Ces fractions de programme sont 
appeldes "segments" ; AppleWorks en comple plus de 
trente. C'est la pariie d'AppleWorks sumommSe "Host" (le 
Mailre des licux) qui sc charge de gercr le va-ei-vieni des 
divers segmcnu. Mais n'anlicipons pas trop, et revcnons au 
demairagc. 

La premifere des tSches d'Apiworks .system est de 
s'assurer que votrc Apple dispose d'au moins 128Kq. Ceci 
fait, il s'inslalte lui-mcme en mcmoire de telle sorte que 
I'elcmeni dc programme appeld "Host" soil present en 
permanence pour g6rer AppleWorks. Puis. AppleWorks 
organise son envirbnncmcni de travail : toul d'abord, il 
ddconnecie /ram (vous savcz, cc petit disque virtuel que 
crcc ProDOS. et qui utilise la deuxifcme banque de 64Ko 
priSsente sur tous les Apple de 128Ko). En effet, Apple- 
Works a besoin de cet espace mfimoire pour y cnireposer les 
informations relaiives aux fichiers du Bureau, Auianl 
ddconncclcr /ram lout de suite, pour que personne ne soil 
lenid d'y mettre autre chose. 

Ceci fait, AppleWorks met h I'abri le nom d'acc&s utilise 
lors du demarrage d' Apiworks .system. AppleWorks 
uUlisera cc nom d'accSs chaque fois qu'il ira chcrcher 
d'aulres fichiers AppleWorks, quel que soil le pr^fixe en 
vigueur lors du lanccmcnl du programme. Par exemple, si 
vous choisissez le prfifixe /dur mais que vous lancicz 
AppleWorks avec la commande cn Basic Applesoft 
"-/DUR/Aw/Apiworks. System", AppleWorks ira quand 
mcmc chercher ses fichiers dans /dur/aw. 



Les gestionnaires de 
memoire 

II y en a quatre sur la disquelte, et AppleWorks choisil celui 
qui convient k voire machine. Le gestionnaire dc mcmoire a 
pour role de mdmoriser ct de rappcler au momeni opportun 
les informations relatives au Bureau. Grace S ces quatre 
gestionnaires diffcrcnts. AppleWorks sail uliliser au mieux 
les diverscs configurations de mfimoire pouvant exisier dans 
diff^rents syslSmes Apple //. 
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Voici comment AppleWorks choisit le gestionnairc 
appropriS : 

® Ic programme vSrifie loul d'abord s'il esl en presence 
d'un Apple IIGS. Dans ('affirmative, il charge le 
segment seg.rm. Sinon, il passe k I'diape suivante ; 

® maintenanl qu'AppleWorics est siirqu'il n'a pas affaire 
k un ncs, il v£rific si votre Apple est fiquip^ d'une 
carte dc mfimoire auxiliairc du type RamWorks, 2-RAM ou 
MulLiRam. Si AppleWorks rep&re une carle dolde d'au 
moins deux fois 64Ko, le programme charge seg.am. 
Sinon, il passe 3 la suite ; 

® k cettc ciape, AppleWorks v£rifie si votre Apple est 
€quip£ d'une carte de mSmoire pfiriphSrique (dite 
"slinky") du type RamFactor, RamExpress ou carte mfi- 
moirc Apple. S'il trouve une telle carte, AppleWorks charge 
SEG.XM et crde un fichler disque virtuel k uliliser pour 
I'espace mijmoire du Bureau. 

Note : la carle mimoire auxiliaire esl prionlaire par rapport 
d une carle "slinky" ; de la sorte. si voire Apple est dole de 
I'un ei de 1' autre type de carle, il vous esi loisible d' uliliser 
la carte p^ripherique comme RAM-disque. landis qu' Apple- 
Works ulilise la carle auxiliaire pour son espace Bureau. 

Si AppleWorks ne d&:fele pas de carte pdriphSriquc, il passe 
a I'diape suivante : 

® dans cetle 4*""^ et demicre hypolhfee, vous n'avez pas 
dc UGS, pas de carte auxiliaire ni peripherique... Brcf, 
vous ctcs propridtaire d'un //c ou//c "minimum" de 12SKo. 
AppleWorks charge done seg.oo. Vols ne disposercz, une 
fois le programme el ses fichlcrs en place, que de 40 
maigres Kilo-octets pour le Bureau. 

A ce siade. AppleWorks demandc au gcstionnaire dc me- 
moire dc rSpartir ei d'atiribucr la mdmoire disponible, puis 
dc calculcr I'cspacc Bureau. 

11 est a notcr qu'ApplcWoriis n'ulilise k chaque fois qu'un 
scul geslionnaire de mfimoire ; si vous connaissez cclui 
dont vou-e machine a besoin, vous pouvez cnlcvcr Ics auires 
de votre disque de u^avail, si cela vous arrange. 



L'environnement de travail 



L'dtape suivante est le chargement du fichier seg.el. Ce 
Qchier contienl les foncUons arithmdliques dlementaires 
SANE (Standard Apple Numerics Environment). Le 
gcstionnaire de mdmoire copie le seg.el dans la zone de 
mdmoire de la carte langage, oli il foumira les routines 
malhcmaiiques qu'utiliseronl les modules Tablcur el Base de 
donndes. 

Ccci fait. AppleWorks passe en revue les "slots" de votre 
Apple //, afin d'idcniifier ceux aitribuSs aux lectcurs el k 



I'imprimante. II enregistre celte information pour en 
disposer par la suite. 

Puis, AppleWorks charge le seg.er. C'est le fichier oli 
sont regroupfies les informations relatives aux divers 
rdglagcs que vous ddfinissez au moyen du menu Valeurs 
Standard Ce fichier se souvicnt de la configuration dc d6- 
marrage de voire choix, des options du v^rificaleur 
d'orthographe. des formais date/heure, de la designation du 
disque dc donnees standard, etdes drivers d'imprimante. 

Note : bien que les drivers d' iinpriimnte eux-memcs soient 
contenus dans le fichier seg.pr. AppleWorks ne iappelle 
qu'une seulefois. quand vous ckangez les valeurs standard. 
Une fois qu AppleWorks esl configure, il n'a plus besoin 
que de seg. er et vous pouvez enlever seg. ph du disque de 
travail. 

Aprfes avoir chargd seg.er cn mdmoire, AppleWorks 
s'adresse a ProDOS pour demander si vous avez une 
horloge. Si oui, AppleWorks rclfeve la date dans I'horloge : 
sinon, le programme vous demande de taper la date, 
AppleWorks enregistre la dale dans le fichier seg. es. 



Prechargement 



II est Icmps de charger en memoire les modules que vous 
avc7. specifies. AppleWorks vdrifie si la mdmoire est 
suffisanic, puis charge les modules specifies dans I'espace 
Bureau oil 11 pourra Ics rclrouvcr rapldcment. 

C'csl I'dldmenl "Host" (chargd dts Ic ddbul avec 
/■pj works, System) qui s'occupc d'appelcr selon les besoins 
Ics multiples segments (plus de 30) qui composeni 
AppleWorks. Chaque fois qu'AppleWorks a besoin d'un 
segment, le "Host" vdrifie si cc!ui-ci est ddja sur le Bureau. 
S'il y est, le "Host" le charge instantanemenl. 

Si le segment n'est pas d6ja en mdmoire, le "Host" le 
charge a partir du disque. C'est pourquoi, durant la mcme 
opdralion, le disque peut loumcr une premiere fois, mais 
pag Ig fgj§ sujygnle, Ei) gffej, qygny yn §egmenf es[ chgrgd | 

pariir du disque, le "Host" essaye de le conservcr en mg- 
moire en vue d'un evcniuel appcl ulldricur du meme 
segment Si AppleWorks n'arrive pas k trouver le segment 
voulu sur disque, il vous en informe en demandant de placer 
le disque approprid dans le lecteur. A ce stade, Ics choses 
sont en place, les segments ndcessaires oni did chargds el 
rcnvironncmcni de travail esl ddfini. AppleWorks va done 
appeler le segment Organiseur qui affichera le Menu 
principal. 

Randy Brandt nous promei un prochain article ou il ddcrira 
Ic role de I'Organiscur. 



28 



Pom's rf 49 




MarceCU godefroidj Cfiristian (Piurd 



Macintosh Toolbox, Programmation en C, 

de Fr6d6ric A. Huxham, David Bumard, Jim Takatsuka. 
Editions Sybex, 520 pages, 328 F. 

11 est rare que nous soyons aussi sSduits par un livre mais 
li, nous avons une bible. Sybcx nous a loujours proposiS 
des livres de qualitd et cclui-ci fait panic de la s6rie des 
parfaits. Ce n'est pas "Inside Macintosh" car c'csi 
transponable, c'est en frangais ci c'est didactique. Ce livre 
est deslin^ au programmcur en C qui se met an Macintosh ; 
on commence par les regies de base dc I'interface Macintosh 
pour arriver k une application complfeie en fin d'ouvrage. 
L'enscmble est rdellement progressif, commen^ant bicn 
enicndu par la gestion des ^vSnements, masquage, priority, 
etc. Puis sont passes en revue les gcstionnalres de fcneircs, 
de menus, le dessin avcc QuickDraw, Ic gestionnaire dc 
mcmoire, les probl&mes de multi-fenetrage. TextEdit, les 
ressources, les coniroles, les dialogues, la gestion dc disque. 
On y ajoute I'art et la manifcre de faire unc vdritable 
application avec les problfemes Ii6s au passage des 
£v£nemenis aux acccssoires de bureau. 

Ce n'est pas tout k fait un roman mais, on n'abandonne pas 
la lecture en cours de route, on est impatient de poursuivrc. 
11 est rSellement accessible au ddbuiant en C qui refermera ce 
livre avec !'agr<5able sentiment de savoir enfin quels sent Ics 
principes directeurs de la programmation du Mac. II n'y a 
pas le c6i& rfibarbaiif d'lnside Macintosh du fait de la 
volonic des auteurs de construirc un veritable cours sur le 
fonclionnemeni de la machine. Bien entendu, ce livre ne 
dispense pas de la documentation technique du Macintosh 
qui sera ndcessaire lorsqu'on s'inicressera ^ Applcialk par 
exemple, non abordS dans I'ouvrage. II est a noter que 
cenaines limitations 6voqu6es dans I'ouvrage n'existent plus 
avcc les demitres versions du systcme, mais cela ne change 
rien aux principes developpfis. 

En un mot, c'est LE livre pennetiani dc commencer sur le 
Mac. La composition est excellente. la traduction 
dgalcment, meme si "poigniSe" pour "handle" surprend 
toujours. 

Une petite ombre : si le prix de I'ouvrage est abs iargemcnt 
justifiS par sa quality incomparable, la disquette rcprenant 
les sources du livre est propos^e ^ 190,00 F. 



Nouvelles perspectives des syst&mes 
d'information. 

Textes prSsentds par AndtC Flory el Colette Roland. 
Editions Eyrollcs, 264 pages, 250 F. 

Cet ouvrage regroupc une selection d'articlcs du congrfes 
1990 de I'Associaiion INFORSID {Informatique des 



Organisations et Systfemcs d'information et de D&ision) qui 
se rfiunit chaque annde afin de faire le point sur les 
recherches europficnncs cn matiire dc bases de donn6es, 
g6nie logicicl, mfithodologie de conception, intelligence 
anificicUe etc. 

Vous y trouverez trois series d'articlcs regroupes comme 
suit : 

• la conception des syst&mes d'information ; 

• la representation des connaissanccs dynamiques ; 
■ les interfaces el les documents. 

Ces articles dressent, dans un premier temps, un Stat de I'art 
des techniques exisiantes de moddlisation des systdmcs 
d'information, puis vienl ensuite une presentation des deux 
tendances importantes des techniques de modelisation 
d'aujourd'hui : les techniques fondles sur les outils et les 
lechniques orientces objet. Vous y Irouverez ta base de 
rigles du systfeme expert d'aide k la conception OICSI, un 
mod&le de repr6seniaiion des connaissanccs ddveloppdes dans 
le cadre du projet SHERPA (son objectif est de definir et de 
mettre en ceuvre un syslfeme de representation de 
connaissanccs dynamiques bas6 sur un module a objets). 
Vous aurez egalement un apcr^u sur les notions de hi^rarchie 
d'objeis, de contextes scmaniiques sur schema Farandole, 
des interactions conncxionistes enirc rhyper-documenl et les 
attaches de ses nceuds et, enfin, unc prdsentation du systfeme 
LOOK, congu pour prendre en compte la construction des 
interfaces utilisaicurs pour des applications bases de donnfcs 
oricnides objets. 

Ces articles, hautcment techniques, ont 6tfi r&ligfe par des 
chcrcheurs et sont Supposes s'adresser k tous ceux — £tu- 
diants ou professionncls — qui veulcnl comprendre quclles 
seront Ics fonctionnalitcs des systfemcs d'information k 
I'avcnir. Or, p&;hant dans un premier temps par I'absence de 
clarte genSrale, ils manquent vraiscmblablement de 
continuiliS el de coherence : si certaines donndes font parfois 
ddfaut pour saisir I'intention des auteurs, d'autres se 
recoupent entre articles et vicnnenl semer la confusion. Ces 
discours seront done certainement saisis par un cadre Ires 
restreint d'initiSs qui peut-cire y trouveront malgr^ tout, un 
int6r£t didaclique li& k leur travail. 

II est dgalement curieux que la prfisenlation ait pu cue 
ndgligde S ce point : vous trouverez dans ccl ouvrage fautes 
d'orihographe el fautes de frappe, corrections manuelles, 
dfifauls de misc en page, etc. Lesquelles, par leur frequence, 
rcndent la lecture lr6s laboricuse (trop !). Pour finir, que les 
Iccteurs qui ne Hsent pas I'anglais s'abstiennent : une partie 
dc I'ouvrage leur sera inaccessible. 
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Voila pres d'un an que je dois faire 
cette interview du plus grand 
^diteur frangais de logiciels dont 
plus personne n'ignore les 
produits : 4D, File Force, Sans 
Faute... J'ai done voulu avoir I'avis 

de Marylene Uelbourg Delpnis sur 
le monde Mac, et apprendre ce que 
nous prepare ACI. 

Pom 's : Le depart de J .-L. Gassee... 

Marylene Uelbourg Uelphis : Pas de commentaire. 

P : Quel est voire sentiment sur I'evolulion actuelle du 

Mac vers plus de puissance, vers les grosses socieies plus 
que vers le particulier ? 

M. DD : Moi je suis contenie de rfivoluiion naturelle du 
Mac. Du 128Ko au Fx, ce soni deux machines 
apparcmment irfes diffdrentes mais, en fait, ellcs sont 
fondamcnialement ideniiques : c'esl la mSme infrasmiclure. 
J'ai ct6& ACI ^ une dpoque oCi personne ne croyait au Mac, 
en juin 84. J'ai fais ce choix non parce que je connaissais 
la communaulc Apple mais pour des raisons d'ordre 
technologiques. Ei plus le Mac a avancS dans le temps, 
plus je me suis sentie conforlde. Si le 128Ko n'etail pas 
suffisamment puissant, il avail lous les SlSments de base 
pour le devenir. 

La nouveaulfi lechnologique de I'fipoque me paraissait 
suffisamment significative et done m'intSressait. Si on 



prend aujourd'hui Ic Px, et meme le Ilex qui lui est 
anicrieur, le Mac est un support pour base de donndcs d'une 
puissance difficile ^ imaginer. 

La qualiti des oulils de diivcloppcmcnt, de leur integration 
et de leur suivi n'ont pas d'Squivalenl dans les aulres 
mondcs. Je suis finalement contente d'avoir cm et parid que 
Ic Mac €iait la mcillcure ptatcforme de base de donndes. 
Acluellemcnt, les autrcs univers ne disposcnt pas de tels 
outils pour faire toumcr 4D, 

P : Done pas de 4D sous OS/2, ni sous Windows ? 

M. DD : Non, il y a ccrtainement des choses intcressantes 
qui s'y font mais, c'est ir6s trcs loin dcrricre la qualilc du 
Mac et sunoui de rauto-configurabilitiS, ce qui est quand 
m5mc hallucinant sur Mac. L'importance cssentielle du 
Mac vicnt de cette auto-configurabilitd. 

Pour y arriver, il faul vraiment beaucoup de talent. Ce n'est 
pas encore demain qu'elle apparajira sur MS-IX)S. Si Je 
mettais 4D siu^ un univers IBM, je ne b6n6ficierais que de 
30 ou 40 % de ses qualitds. J'aurais, au fond, le meme 
niveau de tonctionnalitfi que Paradox qui n'est pas sous 
Windows. Nous avons joud la carte suivante : avoir un 
produit qui puisse convenir ^ deux cibles trds diffdrentes, 
I'utilisateur final et le d^veloppeur de trds haute gamme. 
Pour moi, la grande nouveautd avec le Mac 6tait d'avoir un 
produit qui s'adresse S Tuiilisateur final. Quand on essaic de 
comprendre et de voir tout ce que Ton peut faire en 
I'utilisant, la comptexild est effroyable. C'est peul-Stre la 
machine la plus compliqude ei la modcmitd a dtd la capacity 
a rcgrouper ces deux extremes, 

C'est un produit qui reflate dans une grande mesure 
I'utilisateur, 4D aussi. Celui qui ne veut pas programmer 
rdalise ddjS de jolies choses sans la moindre ligne de code, 
et celui qui veut faire dans I'hyper sophistiqud peut alter 
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Ir6s loin avec 4D. On retrouve par ailleurs dans 4D des 
gens qui onl carrSmenl changd de m^lier. comme des 
iitg^nieurs agronomcs, des medcctns. . . Mais aussi des gens 
qui dfiveloppaient sur des 3090 (IBM) et qui, jusqu'S 
pr^nt, n'en avaient Hen eu i faire des bases de donn&^s en 
micro. 

Pour un programmeur cobol, rauiomatisaiion en dBase ne 
veui ricn dire car il esi habicu^ S une hyper sophistication 
et que cela prcnd, de toutcs fa^ons, beaucoup de temps. On 
pcui obienir ceite hyper sophistication avec 4D. Mais est- 
ce que je r^ponds bien & la question ?' 

P : ParUeliement. En fail ma question eiaif : on reproche 
d Apple d' avoir abandonne sur le bordde la route toute une 
parlie des uiilisateurs. 

M. DD : II y a plusieurs niveaux de r^ponses. C'est vrai 
que la micro domesuque, disparait inscnsiblcmcni avec les 
nouvelles versions du Macintosh. Mais on pourrail se 
demander si la nnicro domesuque, telle qu'on la vivaiL dans 
I'idtologie au ddbui des anntes 80 (qui vcnaii directemcni 
dc I'Apple II) est une ri!alit6. Queiqucfois {'ideologic 
remplace une vision des choses r&lles car assez vite, les 
utiiisateurs du Mac 512Ko en oni fait une utilisation 
professionnelle. Cela correspondait a un bcsoin de maiu^iser 
I'outil informacique, ddlaissant I'uiilisation domesdque. 

Le point fort du Mac n'esi pas le personnel, c'est un oulil 
d'entreprise, meme si cclle-ci n'esl qu'une ou deux 
personne. En plus, si Ton regarde atlenlivement la 
puissance des machines, il n'esl pas sur que le Fx soil si 
cher. Pour avoir une puissance fiquivalente. avec tout ce 
qu'i! faut rajouter sur un PS/2, on arrive k un prix ir£s 
nctiement sup^rieur. 

P : C'est vrai, mais on ne peut touiefois pas dire que ce 
soli la machine du commun des mortels... 

M. DD : Oui et non. Quand on regarde vers I'auLre monde 
^ configuration matdrielle figale, compte tcnu des cartes 
nombreuses et multiples n&essaires pour faire loumer une 
imprimante ou pour une mise en rfiseau, on arrive au- 
dessus du Mac, quel que soil le modfile, el sans auto- 
configurabilitfi. Seul cet aspect des choses fait gagner un 
lemps tout & fail considerable au niveau de la produciiviiS 
personnelle. 11 faut done ponderer. 

Je pense que, dans loule la campagne consisiant ^ dire que 
le Mac est une machine Irop ch^re, il y une part d'intox de 
la concurrence. El, en fail, les gens ne s'apergoiveni pas 
qu'ils payeni plus chcr meme dans des configurations 
basses. On pourrail s'interroger s'il faut donner des oulils 
hyper-sophistiquds lei que 1' auto-configuration ^ tout le 
monde. Je pense que oui, il vaul mieux acheier moins de 

"n° 5" de Chanel el payer son prix, plutoi que d'acheier du 
parfum de superette : on en consomme plus et 9a sent 
moins bon 1 

Si Ton raisonne en terme de productivity, y compris sur le 
temps qui souvenl n'esl pas pris en compte dans les 
budgets, le Mac est probabiement la machine la moins 



ch&re. Incluez les lemps de formation k la machine aux 
produits, et aux maintenances (on casse beaucoup moins 
facilemeni son Mac) : c'est un faux proems qui vieni 
ccrtainement de I'univers d'en face. 

Quand on voii les possibilit^s dans les connections gros 
systtmcs, avec les possibilitds de management local 
extraordinaire, qui fail gagner un lemps de CPU 
considerable, le Mac, est IS une machine carrement peu 
ch&re et c'est la solution. Le Macintosh n'a pas encore une 
position de gestion, mais c'est en train de prendre, et ce 
qu'il y a dc bien c'est que pas mal de gens achfeieni du Mac 
pour utiliser 4D. Plus de 50 % des utiiisateurs de 4D, ont 
achetd un Mac pour 4D. Cela monire bien que cette 
approche est rtelle, malgr6 1'idCologie autour du Mac. 

Apple s'est laiss^ enfermer par i'lmagc que lui donnc la 
concurrence : le Mac est une machine S faire des petits 
"zigouillis", pendant que de I'auirc c6i6 on gSre ! Apple a 
positionnd le graphique comme une fin en soi, alors que 
c'est un adjuvant ou, encore, un outil. Je pense que les 
choses changenL 

Quand on regarde le trailemeni du graphique dans 4D. il n'a 
jamais &,x& dficoralif* mais fonctionnel. On irace un lien 
dans 4D car voyez les kiiom&fes de code qu'on Economise ! 
Quand on voit ce qu'il faul comme programmaiion pour 
gdndrer du relaiionnol partoul ailleurs, le graphique est un 
moyen de gagner de I'argeni. Apple fivolue, et cette 
evolution est assez lenie ; quand une machine se trouvc 
posilionnfie dans une niche par riddologie qui est renforcec 
par la corporation elle meme, il est difficile d'en sortir. En 
revanche, dans des pays ^ histoire r&ente comme la SuMe, 
le Mac n'est vendu que pour la gesbon. Dans des vieux (!) 
pays comme les Etats-Unis, trfes conservaleurs en plus, 5a 
met plus de temps ^ bouger mais. . . bouge. En tout cas, 
Je suis contenie d'avoir fait le pari du Macintosh. 

P : Question provocatrice : lorsque Bill Gales (PDG de 
Microsoft) a affirme il y a quelques lemps : «si vous 
connaissez une base de donn^es serieuse sur Mac. montrez 
la mot. Moije n'en connais pas et c'est pour ga que je ne 
veuxpas en faire sur Mac ,'». Qu' en pensez-vous ? 

M. DD : Non, en fail il faudrait dire "base de donnfies 
sdrieuse ^ vcndre". Bill Gales a essayfe d'acheter plusieurs 
fois 4D, Je le lui ai propose en 85 el, ^ I'epoque, il n'en 
voyait pas I'interet. Je ne peux pas Ten blamer parce qu'S 
rSpoque personne n'y croyaiL Puis, plus tard quand il a 
voulu I'acheier, j'avais dScid^ de crfer ACTUS. 

C'est vrai qu'il y a irfes peu de bases de donnfes s6ieuses 
sur Mac, parce que c'est trfes dur de faire quelque chose de 
propre sur Mac. C'esi un outil fabuleux, dur ^ progiammo- 
et, contrairemenl au monde MS/DOS, il faut des gens ires 
forts pour cela. Nous ne sommes pas mariSs avec Apple, 
mais seriez-vous fiers de moi, si Je vous vendais un 4D 
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tronqud uniquement pour jouer la compaiibilil^ ? C'est 
difficile de limiter un produit filabord pour qu'il passe par 
des trous de souris. 

P : Pourianl. Omnis pretend y avoir riussi. 
M- DD : Vous avez dfijS cssay^ ? 

P : Non. 

M. DD : D'accord, essaycz, ensuiie on pourra en reparlcr. 
Ici nous connaissons trfes bien IBM, Next, Compaq, 
Amsirad, cela fail partie de la formation de base de tous les 
gens qui rentrenl chez ACI. Noire force est qu'on n'a 
jamais 6t6 des Macintosh maniaques dans le style "vous 
achetez un Mac ou vous 6ies un imb<Scile". Jc prcnd comme 
hypoih&se : si des gens n'oni pas compris le Mac, c'esl 
qu'on leur a mal expliqu^. Le monde IBM esi composile. 
mais est loin d'eue ridicule. Le jour ou j'aurais des oulils 
d'aussi bonne gualite que ceux que j'ai sur Mac, 4D pourra 
migrer. Pas avanL 

P : 4D. ou ffl en est ? Esi-ce que ga peut encore evoluer, 
jusqu' oH ira-t-on ? 

M. DD : Je ne sais pas jusqu'oii ?a ira, mais I'hisloirc dc 
4D montre que le produil peut dvoluer. Sans fairc de la 
technologic ficiion, il y a beaucoup de projets en cours. 
Hormis cela, la version 4.1 sortira avant I'ct^ munie de 
nouvelles fonctions et aussi d'une structure avec 
compilaleur el syst&me de hoi-links. 
Technologiquemeni, c'est quelque chose de merveilleux 
d'avoir de vraies hoi-links rapidcs, fonciionnant aussi sur 
disque. Entre la version 4.0 et la 4.1, c'est d^j& unc 
Evolution monumcntale. 

P : Line version 5 . c.e serail quoi ? 

M. DD : N'allons pas si vite, mais... La force de L. 
Ribardifere est de pouvoir jcter h la poubelle 50 000 lignes 
de Pascal, de ne pas se contenter de faire des patches et, de 
repenser complfetemeni le produil. Je suis loul 3 fait 
opiimiste pour I'avenir de 4D. c'esl devenu un standard, el 
I'importani esi qu'il le reste, pour des raisons 
lechnologiques, et non pour des raisons de marketing. 

P : llyaeu mefoule de nouveaux produils annoncis. Ou 
en etes-vous ? 

M. DD : 1^ monde de 4D c'est trois directions : foumir 
des oulils de dfiveloppement dc plus en plus faciles el 
puissanls, des outils de connectivity, el des oulils en 
direction de rulilisaieur final. 

II y a tout d'abord 4D Mover qui permet, grSce i une 
interface & la Foni/DA mover, le transport de proc&lures 
d'une base S une autre, facititant ainsi le travail en &]uipe. 



Fhlis, vicnt 4D Compiler : le compilaleur. II g^nftre un vrai 
code 68000 (ou 68030) permeiiani des facteurs 
d' acceleration dans des proportions de 3 i 6000 d'une 
qualit£ d'inierface remarquable. C'esl le seul compilaleur de 
ce type permetiant de faire de la concaldnation dc chaines de 
caractSres. II offre en plus une compilation quasi- 
insianlanee. Ce produit sortira aussi pendant Viii. Les 
outils de conneciivite permetlent une vraic gestion locale 
des donndes, et non pas seulemeni du front-end. Deux 
produits : Connectivity Kit et le CL/1. Avec ceux-ci. on 
pcul avoir une base de^donn^ sur un Spark ^ New- York, 
unc autre sur un VAX & Cupertino, et avoir tout cela sur un 
mcme 6cran sous 4D. S Paris. Cela ddmonlre aussi qu'une 
bonne impldmentation d'outils de connecuviiS sous base de 
donn^es, font du Macintosh I'oulil ffiddrateur de plates 
formes hSierogfenes. 

Troisifeme void : I'univers des modules utilisateur : 4D 
Calc. 4D Write, Graph 2D, Graph 3D, 4D Draw. Ce sont 
des produits con^us pour s'integrer dans 4D, eLpcnsds pour 
I'utilisation de la base de donndes comme idle. 
4D Calc est un lableur ultra-sophistiqu6. Le lableur dans 
I'hisioire de la micro, a i\& I'outil de reference qui, par les 
cadres, a permis de se d6soIidariser de I'informatique 
centrale. 4D Calc redonne au tableur sa vraie finality, ce 
n'est pas un ouiil de slockage des donndcs mais un outil de 
prdvisions el d'analyses. II peut utiliser tout le langage de 
Qliairifeme Dimension (comme les Sditcurs de recherche, les 
tris). Toutes les donnces slockces dans la base sont k la 
disposition du tableur, cela represente un gain temps de 
saisie considerable et c'esl une nouvelle manifirc de penser 
la m^taphore du tableur. 

Jc pcnse que les gens vonl etre un pcu surpris. lis 
arriveronl li I'evidence que la meilleurc fa^on d'utiliscr un 
tableur c'est dans une base de donn&s, Le tableur poss6de 
une quarantaine de fonctions. Quand on veul faire quelque 
chose de sophistiqud, on dispose de tout Ic langage 4D. 
Quelque chose de Irfes important a tit ajouCS pour les 
programmeurs 4D, ce sonl les extensions de langage 4D 
Calc pcrmctiani de manipuler toutes les possibilites du 
tableur, mcme les changements de police de caractferes ^ 
rintdrieur d'un tableau. Ceci ouvre la voic vers des 
applications integralemcnt personnalisees. Nous avons 
deplace I'univers de la macro vers un vrai langage. Ce 
produit va sortir d6but juillet, avec4D 4.1. 

4D Write est un traitement de tcxte du niveau d'un bon 
MacWritc, I'objeciif n'^tani pas de faire du Word. Mais, 
pour du mailing de society, par exemple, I'imponant est 
que dans un meme oulil, il soil possible d'&rire sa letlre el 
de la slocker. Bien sur, on dispose ici de louies les 
fonctions 4D, et on peui faire de la gestion documentaire de 
Irfes haul niveau avec des nSffirences croisees. La force de 4D 
Write est son integration dans la base dc donndcs, c'est 
vraiment trSs puissant. Lorsqu'on veut consolidcr un 
document, on expedie tout en RTF (Rich Text Format), par 
exemple, pour faire un document de 500 pages dans 
PageMaker. 

4D Draw est pour un peu plus lard. A pcu prfes MacDraw 
1.5. il a en plus loute la gestion des objeis faite dans 4D. 
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Graph 2D est la version sous fonne de modules des graphes 
de Quafrifeme Dimension et est livrd avec. L'inldret de 
I'avoir mis en module est qu'on pourra I'utiliser k 
rintfirieur de 4D Calc ou Write, avec des systfcmes de hot- 
links. 

Graph 3D est, lui, un module grapheur en trois 

dimensions. 

Tous les modules — sauf Graph 3D pour des raisons de 
rapidiid — ■ fonciionnent avec des systemes de hot-links, 
giir^s par 4D. De sorte que si une rubrique 4D est r6fcrencee 
dans Calc ou Write, la modification du conienu de celte 
rubrique provoque une mise a jour en temps r6el partoul 
(sauf si on demande ^ nc pas le faire) et ce, que les modules 
soient ouverts ou non. On peut done faire un mailing 
entier, avec des graphes differents sur chaquc lettre, sans 
jamais avoir a ouvrir autre chose que 4D. 

Ces modules fonciionnent soil de manifere indfipendante 
dans des fenetres extemes k 4D, soil dans un formal 4D, 
L'interface a et6 particulierement soignfie, ci ils sont 
uiilisables sans un mot de programmation. VoilS les 
produits annonc6s par ACi. 

P : Pas de scoop ? 

M. DD : Non, mais ne ttouvez-vous pas que c'esl d^ja pas 
mal tout (3 ? 

P : Quid des aulres produiis editis par ACI. 

M. DD : Qui j'oubliais, Sans Faute est inierfacd 4D el, 
dSsomims. sail corriger des documents Word 4. 

File Force, marche irfes bien, les gens sont lr6s contents. 
L'idfie de base de File Force esl dc crfer un produit de base 
qu'on achfelc par dcfaul un peu comme quand on achcte 
Excel ou Word, Les gens ont un altachement trfes affectlf S 
leurs donn&s, cerlaines pcrsonnes veulcni gircr des adresses 
el finissenl par les mcltre dans un lableur ou un traitement 
de lexte. 

File Force esl la base de donniSes multifichiers, touie 
automalique avec entires rfiffircntiels aulomaliques, ce qui 
esl assez fou. Ce produit peut aussi scrvir h des gens qui 
veulent progresser puisque les bases cre6es sont 
compatibles avec 4B 4.1. L'iiiveslissemenI fiiiancief eE 
inlcllcctuel est compl&iemcnt preserve, c'esl la premitre 
fois qu'il y a une solution complete qui protege les 
utilisateurs. On a fail File Force ddlibcrdmcnt relaiionnel, 
parce que c'esl la modeniitd. II faut donncr d'enircc quelque 
chose qui corresponde S la vie : on ne fonciionne pas en 
mono-fichier dans la vie. C'est la paihologie de 
I'informalique qui a fait fonciionner les gens en mono- 
fichier. 

Des gens nous ont fail le reproche dc rcndre le relaiionnel 
accessible k tous. Ma rdponse esl que, plus on prend les 
gens pour des imb6ciles, plus ils le deviennent. Tout le 
monde m'a dil qu'il n'diait pas vrai que 4D dtail un langage 
compliqu6. Si on donne aux gens la chance de pouvoir 
essayer, ils le font ; je crois toujours que les gens peuvent 




apprendre. On ne me fcra pas faire pour des raisons dites de 
marketing, ce que je crois n'eire pas bien iniellectuel- 
lement. Le marketing bete appelail le mono-fichier, jc 
pense que c'esl une erreur. 

P : Writer Plus ? 

M. DD : On n'en parle plus. 

P : Derniire question. Vous etes parmi les derniers en 
France a mainienir une protection sur vos programmes. 
M. DD : Aux Elats-Unis on a la serialisation qui est 
exirememeni efficace, je n'exclus pas de le faire en France 
aussi, mais beaucoup d'utilisaicurs prdfferent la disquette 
cie. Au niveau des utilisateurs r^eis, 5a ne pose pas de 
probl6mes. 

P : Peut-eire pour 4D. avec lequel en general on iravaille 
au bureau, mais prenons le cos de SansFaute. Ma propre 
experience : je voulais travailler avec en week-end pour 
corriger mes articles, jai oublie ma disquette cle et alors 
plus moyen de travailler. 

M. DD : C'est vrai, ?a m'anive, et j'ai peste aussi. Le 
scul probl6me, c'esl qu'il y a encore trop de copies en 
France. Je protege figalemenl dans toute I'Europe. Pour 
nous, la protection esi un mal n^cessaire, vous savez cela 
nous coute cher, je crois que la serialisation esl plus 
coniraignanie. 

Lorsque vous allez a la campagne, et que vous oublicz la 
Q\t dc voire maison de campagne. c'est un peu la meme 
chose. Chez nous tout est fail avec des produiis ACI, done 
nous Savons r<Sellemeni combien fa peul ctre ddsagrfiable. 
Pour Fenvironnement 4D, loutes les protections sont 
transfcrables sur la disquette utililaires. Si on a 4D Calc, 
Write, Draw, etc. Une seule disquette clfi sufBra. Le 
compilateur sera protSgfi, meme aux Etais-Unis. L^-bas, la 
sIriaiisaUon rh'a peririis de d^coiivfif 30 000 fiiTiliiRSs 
piraifis el c'esl ^norme. 

Sur ces mots, Mme Detbourg Delphis, m'a fait elle meme 
une dfimo de 4D Calc, et ce que j'ai pu en voir 6tail 
fipoustouflant. Meme si cllc n'ose faire une quelconque 
comparaison, je me permets, moi, de la faire avec Wingz. 
J'ai pu, fi cette occasion, constaler que c'est elle meme qui 
rddige les manucls d' utilisation. A la question "comment 
cela se fait-il ?", elle m'a rfipondu : "comment voulez-vous 
que je parle de mes produiis si je ne les connais pas k 
fond ?" Imparable, et tellemcnt rare ! Je vous reparlerai bien 
sur de loules ces nouveauids, dis que j'aurais pu en faire le 
lour, ce qui, je I'esp&re, ne saurait larder. 



Ariel Sebban 
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"La plus puissante gestion de prospects pour 
Macintosh sous HyperC::rd, avec recuperation de 
I'annuaire electronique". 

C'est ainst que les auteurs onl humblemeni baptisfi 
Sixi^me Sens, une dSfinition qui fera souffrir plus d'un 
asihtnatique ! Cel ensemble de piles HyperCard est presents 
dans une boile en carton carr^c, comportant une disquelie el 
un aide- md moire carton ne depliant de 6 pages. 
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Comme le montre I'dcran ci-dessus. la prescnlation de la 
pile est claire ei sympalhique. La zone de icxie avec 
ascenscur & droite est, en fail, ffiple ; Ic menu pop-up juste 
au-dessus de ceiie zone vous donnc le choix enire les 
rubriques "Observations", "Affaires en cours" et "Affaires 

Sixigme Sens vous offre un certain nombre de services : 

¥ insertion automatique du code postal de votre ville par 
un clic dans I'iconccorrespondantc dc la barre d'icones ; 

¥ composition automatique d'un numdro de telephone ; 

¥ exportation des champs que vous choisissez vers un 
fichier ASCn ; 

1¥ importation similaire des informations voulues ; 

f entrfie directede commandos ApplcTalk kappliquera 
I'ensemble de la pile ; 

^ aide en ligne claire et bien con^ue ; 

¥ recherche, k condition que vous ulilisiez la syntaxe de 
recherche AppleTalk ; 

t r&up6ration sur I'annuaire filectronique (le 1 1) ; 

¥ le menu personnalisd "Action", qui comporte Icscom- 
mandcs "Relances du jour", "Rclances dc la semaine". 




iMriez 

"Composer le numdro", "Annuairc filectroniquc...". "Code 
postal", "Importer..." el "Exporter..." (toutes ccs 
commandes, & pari les deux premieres, soni acccssibles 
dircctemenl par des iconcs) ; 

diverses sories d'ddiiions. 

Quelques regrets 

La ncccssile de placer le fichier des codes posiaux dans le 
dossier HyperCard : j'aurais prcferc devoir indiqucr, & la 
premiere utilisation, le ciieminemeni n&essairc. 

Aucune indication (documentation ou aide) ni icone pour la 
creation d'une nouvcllc fiche : que fail alors I'utilisateur qui 
nc connalt pas HyperCard ? 

La pniscncc d'icone pour premifere et demi&re fiche, ainsi 
que la coniiguild des icones "Fiche suivantc" el "Fiche 
prcccdcntc" aurail etc plus pratique. 

L'absence de commandes pour trier la pile : I'utilisateur ne 
peut effectucr de iri qu'en enuani lui-meme des commandes 
dircctes cn HyperCard, ce qui n'esl pas facifitS par le fail 
que la pile soil prolcgee. 

Aspects sympathiques 

La conviviality dc la pile, la qualitc dc son dessin et de 

Le fail qu'il s'agisse d'HyperCard, vous permct toujours de 
changer ce qui vous dcplait, chose impossible avec un 
logiciel fermd. Mais ceci avec deux bemols : lout d'abord. 
la pile ctani protegee, il faudra avoir sous la main un 
utilitaire de deproleclion de pile ; ensuite, vous dcvez faire 
auention aux collisions entre vos modifi'^ations et les 
operations gfirdes par les scripts de la pile qui pourraient 
alors ne plus fonciionncr comme prcvu. 

Conclusion 

En guise de conclusion, voici un produil agrcable a utiliser, 
qui pourrait I'eirc plus encore, si les auicurs tenaicnl 
compte des divers regrets cxprimds plus haul pour amcliorer 
Icur produil. Sixieme Sens est vendu 2 255 F TTC par 
Topics. 
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Void deux programmes pour le GS : FrameCoIor et SysError. Tr&s utiles pour les 
programmeurs, ils le seront aussi pour les personnes qui aiment savoir comment 
leur machine fonctionne. Le CDA Guillotine, pour sa part, sera tres vite apprecie 
par ceux qui ont besoin de stocker et d'editer des textes Ir^s long a charger. 



Guillotine 



Voici un programme utililafre qui 
s'adresse aux siackhanovistes du 
iraitemeni dc tcxtc. En effct, il a pour 
objcclif de sectionner des fichiers de 
lype lexte, lorsque ccux-ci sont trop 
imporlanls pour feire chargds d'un seul 
tenant avcc certains programmes de 
traiiement dc texte classiques (seooo 
octets semblent Stre Ic maximum 
chargeable). Aprfes les avoir sectionnds 
avec Guillotine, vous pourrez enfm 
les consulter et les modifier. De plus, 
si jamais le fichier a une taille 
sup6rieure il la tallle mSmoire 
disponible, vous pourrez en charger 
simplement une panic (au choix qui 
plus est), el la sauvegardcr par la 
suite. 

Les fichiers peuvent atre ddcoupds dc 
deux fagcms difKrentes : 

» en indiquant la taillc voulue pour 
chaque tronfon (identique pour lous, 
sauf feventuellement pour le dernier), 
en hexad&imal ; 

en dfisignant un mot d^limitateur 
dans le texte. Pour ce faire, Scrivez 
votre texte comme ceci : 

fic/ie 1 
bl3 blabla.- 
End 

fiche 2 
bla etc. 
End 



Ddclarez un tractionncment avec le 
mot End. Guillotine va crter x fichiers 
nomm£s : 

NOM 0000 
NOH 0001 



Ainsi, par sa grande facility d'emploi, 
Guillotine est un programme qui ne 
manquera pas d'inl£rcsser les ulili- 
sateurs — mSme occasionnels- — de 
Iraitement de texte. 



SysError 



Encore un acccssoire de bureau, allcz- 
vous dire ! Mais ne vous est-il jamais 
arrivd de vous demander ce que Error 
$0021, par exemplc. signifiait 
r&illement ? 

SysError arrive k point pour vous tirer 
de I'ignorance dans laqucUc vous 6tiez 
plong^ jusqu'^ ce jour. II permet en 
effct d'afficher louies les erreurs 
connues du systfeme. 

La principale qualite de ce NDA est Ic 
peu de place qu'il prcnd en mSmoire 
(2 600 octets), tandis que les donndes 
ndcessaires sont sous forme de 
ressources (3,2Ko). Le programme 
Iui-m6me se passe dc commcntaires. 

En bref, il s'agit d'un accessoire de 
bureau qu'il est fort conseill^ d'avoir. 



Frame Color 



Les programmes utiles aux ddve- 
loppeurs ne sont pas forcdment 
monnaie courante. surtout sur GS. 
Frame Color en fait partie. II permet 
aux programmeurs, quelque soit leur 
langage, d'utiltser la fonction set 
Fmine Col or ou sa ressource pour 
d^finir la couleur des fenetres de 
I'applicalion en cours dc ddvclop- 
pemenL 

En effct. ce programme utilitaire sert k 
visualiser direclcment les couleurs 
obtcnues en changeant Ics valcurs, 
aussi bien pour une fenetre "normale" 
que pour une fenfilre "d'alerte", que la 
couleur soil sfilcciionndc ou non. Une 
fois les couleurs ddsirdes obtcnues, il 
sufQl de reporter Ics valeurs donndes 
dans son programme. 



Sur la disquette 



Vous tiouvercz les objets exdcutables 
de ces Wois programmes dans le 
dossier /ossnoues de )a disquette 
Pom's n" 49, ainsi que leur source, 
leur CDA et leurs macros. 



Pom's if 49 



Source 

Guillot'me.main 



ShutDam 



tint On 
START 

Tdc 

St a PtglttrmD 



•• InlCiiliiation dmi ouEJij 



Etitiy 

euMhmzll CStfllHtndlm 
PuMhLang Jnitff4/ 
_5h u t Do wnroei a 

Pti <HyID 

MtSliueOom 
_TLShutatim 

SJiorca 

Ult JiDOCOSJ 

Longm 

LiSM RaglairmD 
Tod 



ScartFallmd 



EvtncLoop 









1"M9' 


_TLScaceup 










In I EHSf 


di 


i 


_HHJC«rtUp 








Plm 




man agar 




se« <MyID 










TaakTabSa 


Anap 








i ' Ignarw ' 








i'lgnora' 


Pvahiocd £R9tIati9aourcm 






I ' Ignora ' 


puahLong ETStact 




dc 


i ' Ignora ' 


StaiC\jpTQOla 








PuliLang Inltfltt 




dc 


i 'Ignsr*' 


Sec £vaneloop 




dc 


J Tffnora ' 






dc 


i -Upaatalllniloi' 






Oc 


S 'Ignora ' 






de 


1 •Mctlvatt' 


PuahLong tChlnlt 




dc 


1 'Ignora ' 


PvahLong EChVlmcga 




de 


I ' Tgnora ' 


PuahLoflg ECtiVit rgv 




dc 


t 'Ignora ' 


PurhlfOng CChViarga 




de 


I ' Ignore ' 


Tl Taac NoutitVoLvm* 




dc 


I 'Jgnoca ' 


PI a 




dc 


I 'Ignora ' 


Brl shucooitn 




dc 


1 ' Sgnara ' 




Taak 




LongPaault 








PuihiHird £R>f JsRaiourca 




dc 


S 'Ignora' 


PvahLong EHanuBarlD 




dc 


1 'DoHantJ' 


PuahLoflg CO 




dc 


i 'Ignora' 


_Na>iMan uBacl 




dc 


I •InWlndai' 


_SatSyaaar 




dc 


1 'Ignora ' 






dc 


1 ' Ignora ' 


Puatihang CO 




dc 


1 'HanulSS ' 


_SatManuBat 




dc 


1 'Ignore ' 






dc 


i 'Ignore ' 


PuafiBord e$i 




dc 


I 'Oonvnu ' 


FlicAppleHenu 




dc 


I 'Ignore' 






dc 


t 'Ignore ' 


HOrilRaiuJC 




dc 


I 'Ignore ' 


Ft aMmn uBar 




dc 


I ' Ignore ' 


PI a 




dc 


I 'Ignore ' 






dc 


1 'Ignore ' 






dc 


I ' Ignore ' 


DranManuBar 




dc 


i ' SnControl ' 


InleCvraor 


Ignara 


Anop 



Jar SP_APropo9 

" Boucla prinoipala 

LoopTMaatar Anop 

Jar TaatTopKlndair 

VordMauJ t 
Pujhvord cfFPrr 
PuahLoag CEvant 
_taakl<ajeer 
Pie 

Baq LoopTHaatar 

All A 
TU 

Jat ITatkTabla.x) 
LOa OulCflg 
Baq LoopTHaatar 

" ffanacura daa eutlla 



UpdataWIndav Aaop 
BCa 

Activate Ajlop 
Rtl 

DoMana Anop 

LOa TaakOata 
Sac 

Sbc C250 
Aal A 
tan 

Jar IManuOiap.X) 

UaSniCt Entry 

PuihWacd LO 
PuthHord TaakHatatl 
jmitaHanu 

Rta 

MenuDlap Anop 



dc i 'Ignore * 
dc i' Ignore' 
dc i 'Ignore ' 
dc L* Ignore' 
dc 1 * Ignora ' 

ife I'HanulSS' 

da I 'HanuAPropoa' 

dc 1 'ManuOpan ' 
dc I'HanuAlda' 

dc i ■ManuQuiC 

InHinrSov Anop 
see 

HanuSSS Anop 

LongPea^jlt 
_Frontwlndow 
Cda l,a 
Ore 3, a 
Bail HotUndou 

_CloaatHndo>/ 

Kea 

HoVinrJou Anop 
PI a 
Pin 
Btt 

InControl Anop 
Kta 

TaatTopWlndotr Anop 

I^ngltaault 
_rrcn CWi ndo V 
PI a 

sea 'Handle 
Plx 

Stx <MandjB'2 



Lda cHandla 
Oza rllandlo*^ 
Baq TTKiBlO 

Worilllaault 
Puahlong <Handla 

eecmind 
eia 

Anop 

Cap Vlndtypa 

Baq rraeeio 

Sta HlndType 
Jar DoSyrChange 



TTtlOBlO 



DoSyaOianga 



LoopEnabl a 



HindTypa 
SyaDaact 

LoopOlaabla 



Anop 

Rta 

AflOp 

Cap £0 

Baq syaDeact 

Lda CFiracItem 

Anop 

PJia 

Pha 

_Enal>laMIeam 

Plm 

Ina 

Cap C1SS*1 
Sec LcopEnabia 

net 

da ! 
Anop 

Lda CFiratltam 

Anop 
Pha 
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Hen UQuI t 



Pit 

In a 

Clip «55<I 

Bcc LoopDltabJt 

Bti 

Ajtop 

Jmx SP_APeopo» 



Anop 

Jar OptfiLoadFSc 

nti 

WotOBtavlt 
Puahtford £t 
PuahLoii^ £0 
PuthLont LASAlda 

Ma 

M* 

Lda £-1 

set OultFLg 

mm 



SP_JiPropo3 



STAHT 
Mor<lRsiuJ C 
puahtiartl L4 
PuMhLong £0 
PuMhLong lASPropos 
_Ai»fCBindoif 
rim 



ErrPradoM 



Loop 



LiiB tHsgOicila 

St a EcrMs^PCr 

St.a errHsflPcr'2 
Bra ShoifDlaiog 

Anop 
shortm 

Lda <H\liriErrauc 

Ldy £0 

Anop 

Cap ErrfiuBa, y 
Baa HncvnErr 

snr 

Bern Loop 
Longm 

- — Urrflur nan cannua 
Pha 

PujfiLanO LnagPtodos-i-IS 
In t2Hax 



ShaitnlBlag 



Lda CNijPiDdof 
sea BrrMaPcr 
Lda f-NjffProdoi 
Sta BrrHsflPtrM 
Bra shotralalog 

' Erraur Connua 

AflOp 

Longm 

Tr* 
JM m 
Ami m 
Tmy 

Lda BerPtTa,y 
St a ErrHagPtr 
Lda ErrPtri*2,y 
St a EiiHlffPCrtj 

Anap 

NardRsjuit 
Puahlong CFatalTaap 
PuMhlOP/J £0 
_SCOpAltlC 

Urn 

Lda <ltumBtrmuc 

Sac 

Btl 

mi 



Guillotine 

Ressource.S 

Unci ude 

'/Poma/Llbralrie/Typea.Rez- •/ 

/• startup Hecord */ 

fOeflnB TStact 1 
resource rTooJSCartup (TStartl 
! 



SP_FacaJBrt-eur START 

Vaing Dataa 

St a <ttuaEr reur 

tCuraor 

LfJa <NuBErcmur 
And CSFFOO 
Baq ErrProdoa 

Pal <NiiBSrrawr 
PuahLong clisgOiiCiliHf 
PushNacd £4 
In c3Hax 



iBodeEi 0, 

i 

3,S0100, 
A, SOlOO, 

5, SOIDO, 
'/ 

6, SOI 00, 

/• 7. tOl 00. 
/• B.SOlOO, 
/' $,SOIOO, 
/' 10, $0100, 
11, SOlOO, 
14,50300, 
•/ 

1S,S030Q, 
•/ 

16, S0300. 

Manager 
18,50200, 
19,50100, 

•/ 

20,50100, 

set •/ 
21.50100, 

V 

22.50100, 
•/ 

23,10100. 
•/ 

27,50100. 
•/ 

28,50100. 
•/ 

34, 50100, 
/■ 29. 50100, 



/ 



/• master SCB '/ 

/• misc tools '/ 
/• galckdraw •/ 
/• desk aanager 

/' eventHgz •/ 
/* «P>)..rf.il(=r ■/ 
/• sound tools */ 
/• l\DB tools •/ 
/' SANE '/ 
/• int math */ 
/• Hindav Manager 

/* Menu Manager 

/' Control 

/' 00 Aux •/ 

/• print manager 

/• LineEdit tool 

/' Dialog Manager 

/' Scrap manager 

/' standard liie 

/* Font manager 

/• Hat manager 

/' text edit •/ 
/' ACE •/ 



/• 3^,50100, /• Midi Tools •/ 
/• 25,50100, /• NoteSynth */ 
/■ 26,50100 /* Hata Sag •/ 
J 
It 

/a rHenuBar '/ 

fdsfins MenuBarlD 51000 

Ideflne AppleHenuJD 1 

tdeflne FichlerMenuID 2 

fdeflne EditMenuID 3 

tdefine AnnulerlD 250 

Ideflne CouperlD 251 

tdeflne CopierlD 252 

fdetine CollerlD 253 

Ideflne EffacerlD 254 

Idefine FermerlD 255 

/define AproposID 256 

tdefine OuvrirlD 257 

/Define AidelD 258 

/define QaltterlD 259 

/, -/ 

resourcs rMenuBar lManuBarID> f 
I 

App 1 eHen uID. 
FlchierMenuID, 
EdltMenatD, 
)i 
I: 

/. */ 

resource rManu fflppJeMenuIC) { 

Appl eMe nuID. 

Ox AO OB. 

Appl eMenuID. 

I AproposID ): 

I; 

resource rMenu IFichleiManuID) ( 
FichlerMenuID, 
OxA008. 

FlchierMenuID, 

I 

Ouvri rIO, 
FermerlD. 
Aide ID, 
OuitterJD 
>.■ 
I; 

resource rMenu (EdltMenalDI ( 
Edl tMenuID, 
OxAOOe, 
EditMenuID. 

{ 

AnnulerlD, 
CcuparlD, 
CopierlD, 
CollerlD, 
EffacerlD 
I: 
)/ 

resource iMenuItem lAproposID) f 
AproposID, 
-7", -?', 
0, 

0x8OO0*fOl vidar*fBold, 

AproposID 

it 

resource rMenuItem {OuvrirlDI ( 
Ouvri rlD, 
-0-, -a", 
0. 

0x8000, 
OuvrirlD 
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« , , , ^/'ciie' ^ (u( fifCe^rCj mime 
s'ifs 'a^^&^ i^^&^l^0f^£^ 7.4 m 
3. 0, oh(tm& ^^ose^ toi^^oa/^ 

sm^f/c/Ce. 

moKff(tef^e€'pf^e^r^, ^sm*^k, 

mo/^ ma/e d tot^'mte^ of& 
r^ke^^e^ ife^ aa CeJ^, sa/te- ale 
elocame^t^ kai/€a&&. £€e(^ 

S/en s-dr ^ otoH/f&e^ p/aoAiee ahte 

cUviHue^ me. ^tver- olc t/KS^ert^ 
oloif^ & texte^ ^t/-meme /m^/me 
Oif^ ^ ^ffSce </e ca/^c(e/^ 
me oaf(iM'et(t^ clajfe ^ Cajf&' ^eje 
e^fffi^fiS'. ^€ pa/? me^ ^^io^ 
&/Mmf'^es petuH^t s im^/mef^, d. 
(^o/me ee^/hiu'C cute mac^me 
sef^'&. f 



Audep 



^cAfef fcet^ta/K^ clooa/Ke^Cs ne 
/'■e^.c/^eKt ^e motj^ pf^^nc^ one 
tfote^ &kf^KOme€/^ uj( eatf^C/ett 

e/edfr^i? pe/'i^ mott C&m^ d 

y^p&,l^&f-£^ F'^rt/}^, pour- 

^MiiC^he (Ht-eC-we/(t af€^ 
^p^H^mmmedecop/e'. . . 

ce ^pas; me ^ue^t/oK ^mp&r d 
cecui (ja/ite ^mte^Cpas ^ 

cemikH d'appA'catiaHS poof^ 
ce ^aeje^<^ajf^ ^ TJiKeOat ? 
fteomS/ett tempepe^a dojfS 
incompatfif^tie cte ^c^ef^.?. 

F'im^ef(t, mes T/meOnCj c eet 

kfee-e^'is^. Po/^Ca^eepa/^t/^ 
250 000 atffm€eo/-e . . .» 



une idee simple... 
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I; 

zasouTca rMenultem (FaraerlD) { 
FazmerlD, 
-f, -f 
0. 

OxS0OD*fDlvidmr*lDi3abled, 
FeimerlD 

I J 

raaourca rHenuItem (AldelDt I 
AldelD, 

"H-, -h; 

0, 

OxaOOO-tlDlvider, 
AldelD 

); 

resource rMenultem (QaltterlD) ( 
Qui CtarlD, 
-0-. -q; 

0, 

oxeooo, 
aaitterlD 
I; 

resource rMsniiltgm (AnnulerlDJ ( 
AnnulerlD, 

f t 

0, 

OxBOOO*fDlvl dar+fDl aablod, 
AnnuJerlD 
1 1 

raaourca cHenuItem (CouperlDI ( 
Coupe r ID, 
'X'. -«•, 

0, 

OxaOOO*f Disabled, 
Cooper ID 
I; 

rsaourcs rMenuItom ICoplerlD) i 
Copier ID, 
-C", -C-, 

0. 

OxBOOOttDiaablad, 
CopiezlD 
}: 

roaourcB rMenultem (CollerlD} ( 
CcllerlO. 
-V", -v", 
0. 

OxBOOO+fDi vider+IDisabled, 
CollerlD 

raaaurce rMenurtem (EffacerlD) t 
EffacecID, 

» H mm 

r r 

Or 

0x8000* f Disabled, 
EffacerlD 
I- 

/. ./ 

resource rPStcing lAppleMenuID) f 
"S- 

>.• 

rBsoarcB rPString (FichierMenuID) 
{ 

• Fichler " 
); 

resource rPStrlng (EditHenuID) f 
" Edit ■ 

); 

/. ./ 

resource rP5trlng lAprapoalDj t 
"A propos ..." 
I; 



resource rPString (OuvrirlD) ( 
'Ouvrlr' 
It 

resource rPString (FermerlD) I 
'Farmer' 

h- 

resource rPString (AldelD) f 
"Aide- 
I; 

resource rPString fOulCterlDJ ( 
•Quitter- 
I; 

reaaurce rPString lAnnulerlD) ( 
'Annular' 
I; 

resource rPString (CouperlDI t 
"Couper' 
I; 

resource rPString (CopierlD) ( 
"Copier' 

}/ 

resource rPString ICollerlD) I 
'Coller- 
}! 

resource rPString (EffacerlD) I 
"Effa cer~ 

I; 

/• A Propos GulJlotine — '/ 

IDetine ASPropos 1 

reaaurce rAlertString (ASPrapoa) 
{ 

"\S00" 

-\$3S\S0O\S9O\SO0\$95\SD0\SD0\S 
01* /* Rectangle fenetre 

•/ 

~\soo/- 

Tfl Center Just 

TBEndOfLlne 

TBStyleOutline 

TBForeColor TBColorl 

-G\iillotlnB\n\n' 

/• \n = TBEndOtLina •/ 
TBStylePlain 
TBForeColor TBCalorO 
"Desnoues Patrick S Pom"3\n\n'' 
"Version 0.3- 
"/I'O- 

'\$00" 

I; 

/. Menu d'aide -/ 

tDefine ASAlde 2 

resource lAlertString (ASAlde) I 
-\fOO' 

'\S12\$00\S0C\fO0\$C3\S0O\S74\$ 
02' /' Rectangle fenetre 

'/ 

"\S00/' 

TBCenterJust 

TBStyleShadow 

'Menu d'aide\n\n" 

TBLeftJust 

TBStylePlain 

'Ce logiciel eat destinMSE \$88 

ceux qui veulent pouvalr 

uti User dea " 
"flchiers de type texte guelgue 

salt Is taillB de ceux-ci et 

indi/f \SflErement " 



" de la capacit\SSE m\SBEmaire 

de leur Apple II as.\n\n- 
'II Tout d'abord si la Ram est 

Insu/flaanto pour charger le 

fichler, una * 
"option vous permettra d'en 

charger aeulemsnt una partle, 

que vous pourreB " 
"ensuite sauvegarder, vous 

permettant de i 'utiJlsor 

onaulte avec votre " 
"traltement de texte 

faworl . \n\n" 
'2) line fais le fichler en 

ni\$BEmoire, vous pourrez le 

Culllotiner pour en " 
"fairs plusieurs segments, en 
fonction da I'un de cea 2 
crit\)SFres ;\n' 

- - 5oit en plusieurs segments 
de xxxx octets. (Valeur en 
Hexad\SSEciaale) . \n" - 

- - Soit en (i\5eEterminan[ 
apr\$3Fs quel mat il faut le 
sectionner. " 

■/l'0~ 
■•\$00' 
I; 

/Define Erreur*7 $1047 
IDeflne Erreur4B S1048 
resource rAlertString (Erreur47) 
( 

-52/Ce nom exists 
d\?BEja. . . /fmnuler/A-utre 
VoJuBie/RempJacer\SOO" 

I: 

resource rAlertString lErreur431 
f 

"56/DlsA plein/Annoier/A'utre 
Vol lime \ J 00" 

I; 



Source 



SysError.main 



Pecloda 
HBSllEvtnc 



Equ SB 
Eiju 5FFFP 

JJ'OpSnlffBa' 
dc H'ClBieErtDa- 
dc l4'ActlonErrDo' 
d= K'lnlcErrDa' 
Oc J 'perlode • 
dc l-KaatEvanf 



END 



OpmnErrDm 


5rAHr 






Errlnc 


Eq^ seaaioooii 


r_NuBWintl£rr 


Equ SIOOB 




Cqu M5IK1 


lEtadal 


Eipi S3100 


IcanBombt 


Equ $3000 


BeJUjt 


Equ Sa 


Return 


E^ SOD 


Efpaca 




BeJeCa 


Equ flF 


CCrJF 


Ggqu S06 


CCrlH 




CCrll 


Oaqu SOS 
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CcriO 
CCrlX 
Ccrlr 

/lauEWi/idl 

"Ha Pag* Itca 

Htnair 
KlndSrrtur 

Varl 

PalntHflStrcur 
PolnttlimOucll 

PoJuCflocCInvaJ 



ettiu 111 
Cagu SI* 

Equ 7i 

EiTU UOIB 



Gaiju SO 

Bqu Hafidlt*4 
Equ tfSn<tErceur*t 
E<pi LEAacNandiaf-l 
Ei;u VacUl 
Equ PolneHeaBrrturU 

Equ UingTtxt«*4 
Equ SuBRaMoljrcr*4 



Anap 

EntlPZ £qu Po[ntlt9ctInval*1 

ehb 

na 

Ftb 

Lda Fllald 
B«q ppanMindoi' 
Brl [qnoral 

OptpWlndoy Ariop 

NordPas ul t 
Puahmrd CfilOO 
_CaCM>I'd 
Pi a 

sea ItyUstclD 

PvahLanq <HandlB 

; ItisBrva una paga aaro 

Loi10paauJC 
PuthLoag £EadPZ 
Phm 

pufhHord LtiiooooooooBoaoai 

PuahLang £0 
^KairHandlB 
Polity cHandlt 
Ida 'HandJaf 
St a HyPagaXBco 
PuJijiy tHandla 
Tod 

Stt <PoIntM9aercavr 

Stl <PoinCN«jBrraur-*3 
StI (FoincNusOuCil 
SCI fFolnENunOuUKS 

Jtr InttOuCll* 

nip 

Pip 

flee CaodlnlC 
Jsr taUnaErraiic 
Bra BrtaucFatai 



sen Filrld 

I^gRaault 

PamhALong 

PuMbALang 

PuahALong 

PuahAIfOnq 

Puahward £itafIgRtsorjtca 
PuahLong tr_Sua>fIndErr 
Puahvcrd IcVlndParaal 
_Maiilltndoi/2 

; Nuaira da la tanttra pour Jnfo HDA 

Ida I, a 

Sta ^IndErraur 
sea Raauic.a 
Ida 3.1 

sua tlMndErreurti 

sta Rmaull:*-2,3 

_SacSyalHndoii 

Lda £rTifaBacta 

Ldx Cr_Ilat:tlnval 

Jsr LoadPaal 

SCI <Polntkai:tInval 

sea cPointOectlni'aJ'i 

J AdFtfaa d^ Bdlt ffaaoed du control 

LangRatult 

PuattLong <tlindEecaur 
PuahLong CLEtadal 
_Ga CCCi Handl aFroa Id 
PullLang tHandla 
Ida -Handl at 
Tax 

Lity CBlalineHandlaH 
Lda 'HandlaS. r 
Sta <Handlatl 
StK <Haniila 

! Handla contcala du Jnina Edit 

Ldy CcsClDaCa 

Lda 'MaadlaS. r 

sea rLEHecHandle 
Iny 
Iny 

Lda -Handlat.r 

sea eLEHacHandta*t 

.- Poi/itpv/- do tactangla da'Viav LlneEdlt 

Idy £1 

Lda 'LERacKandlaS.r 
Pha 

Lda • LERacRanaieS 
Cie 

Adc CDiaViewRacC 
Pha 

PualiLB.-ig CRacCUnaEdlt 
PuattLofig £8 
_BlockMora 
Pld 



FatmaOuella 



YaUnaErraur 



AotlonEreDa 



NOACClan 
Act tonBun 



ActJonCtjrsor 

ActJanPtanu 

AcelanUndo 



ActlonBvbpe 



Soadlple 



ErraiieFatal 



Ajjop 

ftirdRvJuJt 
Pha 

PvahALong 
PuahLong EPathnaas 
japanRaaouFcaFIia 
Pit 

ace Haaaurcal^ian 

■UldNaauiE 
Puahvord £0 
Puahtong £PathnaBa*2 
Pha 

_Bj:rorVlndaw 
Plm 

A/top 

Jtr shatOawnToolAp 

Pia 

Plh 

Btl 



Jgnoral 



CloaaBrrOa 



RaaaurcaCpan Anop 



Afiop 

Plb 
Rtl 

ENTRf 

Pbh 

PM 

Pht 

Plb 

Lda HyPagaZaeo 
Tad 

WortBtmaule 

^Ga tCur^aaou rcaApp 

Puahvord HyUaarlD 
_SaCCurllaaD uccaApp 

PuahLong <vlnd£crau£ 
_CloaaWindBV 

Puahlbrd FllmM 
_CtoBaRa»our caFl 1 a 
set Pi la Id 
Bee FarwiaOutSla 



TraitfEnnt 



Jar YaUnrBertut 
Anop 

Jar ShutDomTBOlAp 
Sa CCucPaaourcmApp 

Mb 

Rtt 

Ajtop 

KardBaaal e 

Ldx £0 

Mc 

Ms 

Plur 

Pha 

_ErrorWI ndov 

Pit 

pea 

BHTRt 

Mb 

PM 

Ktk 

Bib 

Pha 

Lda HyPageZcto 

Ted 

PI a 

CBp C^anCAeCio/i 
Baq AcelortBvant 
Aal A 
Tan 

Jar ITabl»Bvtne,X} 
Pld 

Htl 

Batty 

Bntry 

PuahLong <Lei>aeHBndIa 
_L»Idl» 

Entry 
Entry 
Entry 
Rtt 

Entry 

Phy 

Pfut 

PuahLong eEvantHaali 
PuahLong CSI! 
_Bi eckMova 
WordRaaule 
_SatCurReaov rcaApp 
Puahuord MyUiarlD 
_SatCuePesou rcaApp 
tlocdflBsult 
Pushvord £0 
PuahLong CEventHaak 
jraakHaataiDA 
PI a 

Jar TrattaEvane 
_Sb t CurRaaau rcrApp 

eu 

FU 

Rtl 

Anop 

Caip EKayOoi/nEvt 



Cup LAutoKayEve 
BBq EvKayDown 
Cap EUpdaCaErC 
Bag BvUpdata 

Cmp CActlvatfEvt 

Bag Act I vat a 

Cap EuInContzol 
Baq BvOoContcnl 
Ftt 



BvKeyOovn 



EvOpdaea 



Anop 

Jar OaXayOown 

Rta 

Anop 

Jar t>oUpdata 
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eirActiiratB 
Jar OcActSvutt 



An Dp 



VaiaitB 



EvDoCanziol A/I op 

Jmr OoContccl 
At* 

DofeyDown Anop 

And ESIJCI7F 
Cop CRtcurn 
Baq ErrActlon 
Cap LDvictB 

Cmp CO- 

Bci MsCsrUnaEdic 

CBrllnmBdSc Anop 

Idx LTabCBCactErtd'TabCacact 
LccpCdrvcc Anop 

Cap TabCaract.K 

B*t] CarBCLOK 

Bex 

Bpl LoopCteact 
IgnofaCaract Anop 
REl 

NoCifllneEiJJ t Anop 

Cmp £'F'*i 
Sea HoEvmnt 
Cap E'9'*! 
0CC CoractOK 
Cmp L'A' 
flee HaEvenc 

Car act Olt Anop 

Puahford EvantModiflvrs 
PuahLong <LERacHandle 
LEKey 

HaEvsn t Anop 
^oCojIcroJ Anop 

TB3tDaCa4 
Cmp C IconBomtHt 
Baq ErrAclion 
RCa 

EetActlon Anop 

Lcnijfisaull 

CfftPorE 
PuahLan^ cHindErreur 

EPorc 
Wof-dRffjuiC 
^CffECufflejo ufceApp 
Puahwaca MyUaarlD 
^SftCurtiaaau rcaApp 
VordPasult 

PuahLong <LERfcHanrilr 
Pis 

Bn* LofitiSupO 
Brl CJairflscc 

J^ongfupO Anop 

5Eff iftumliaaourca 
langlftiaui c 

PL^jh/.an{} fI£RacHanille 

_l'<at( TtMCIlBBd 

Bit 

Fix 

St a CMandlB 
sr. <liBndlttl 
LOa •H.ndiBj 
Tax 

Ldj •HandlrS.I 

WordRsiuJt 

PJn 

Pfu. 

HBxSlnt 
Pit 

But vtiaito 



UaHa source 



PattCotafiea 



InvaltdnxEdl I 



flri ClaaiRtot 
Anop 

St a <llumP9Sourca 
And LSFFOB 
Xba 

Jar latimasl 
LcjigRmuiE 
Puahword LrtBXZQoxS 
Pustivord £Errtncli-I6 
Puahvocd <r/uatl^a90circa 
_GatRa30urceSltB 
Pie 

Fix 

Ben NoPasourct 

StB <LongTmjiia 

Ida eUuaPeaource 

Jar LotdPea 

Stx <PointHeaErraur 

SE* <PQlnlMBaEcrrfurr2 

Bra ParcCDn/Vfij 

Anop 

Pusfiuo/a £rTaxtaox! 

Pusniong ££rrlnc 

_G«tRa30urceSita 

Pit 

PU 

Ben PartCoaft^a 

Sta <Lon^Taxl:m 

Lda CErrSric 

Jar hoadRaa 

Stx <palntHBaEl[«Hr 

sea ■CPaintmaErraur*! 

Anop 

Pal tPointBtccJnvaJrl 
LdB tpolntneetlrval 
Pht 

Ptl ■tPoinefleccIni'aJ'J 

cic 

Ada £t 

Pha 

InvaiRect 
Bra InvaJLInnSdit 

Anop 

Pel 'PalnCRectinval-'! 
Ida <PoinlRactInval 
Pha 

PtS <PoSntRtcCInvalt2 
CI a 

Adu a 

Pfla 

_EraaBRBCt 
_EraaaRBCt 

Anop 

PuahLang UBCCLSneEalt 

InvalRBCt 
_SBCCurPvaou rctApp 
_Sb tPar E 
Sta 

Anop 

laliQR^ault 
Puahuard £rTBXtBox^ 
Puahvord C£rrTncQ-lC 
Pfli 

_LaadJivaourct 

Pit 

Fix 

Sta <Handla 
StM fllandle*2 
Ldt -HanaltS 
Tax 
Ldy £1 

Lda -UandlaS.r 
REl 

Anop 

LonyRmaul t 
Pha 

puahword CO 
Phx 

_LaadRBaaurca 

Pit 



LoadRtaZ 



CaloPolnt 



DoOpdata 



LorjpLIna 



Pli 

Sta <HandlB 

Stx <HBndlar! 

Lda ' Hands tf 
Tax 

ldy £1 

Lda -Handlefrr 
Rta 

Anop 

LonijRBarjlt 
puahword £rPstcln'3 
puahword £Errfnci}-Jfi 
Pha 

_LoBdRe90urcB 

el a 

Plx 

Bcc CalcPoSnt 

Str CPoincffuaiDiJEi i 

SCI <PDlnEWu»iOuElJ+i 

Rta 

Anop 

sta ^Handlo 

Stx <HBIIdir*2 

Lda ' Handles 

Sta fPDjnCMinOuEiJ 

Ldy £1 

Lda 'Handles. Y 

sta <PointNumOucIl*2 

Rta 

Anop 



LongRaault 

GBCPnrt 
PuahLang <WlndErraur 

ijintlpdatf 
Pel <PoLntRectInval-'2 
Llia <Palntller:tJnval 

etc 

Adc ei 
Pha 

_EtraseRtrct 
PuahLohg tWJndPrreur 
_ OfatiCon tcola 
PujnionB £fiecCtinaErfIt 

PushLanQ <LERacHandlB 
_LaUpdata 
PMShLonQ CPmnSlae 
_Co t Pons I lo 
Puahword £2 
prjshwnrd £1 
.SetPenSl/e 
Pujft-or-d fSJSO 
Pushxord tHautWJndJ 
Puaflmrd CSISO 
FuaAmrd CHautWlndl-ll 
PuiBwid CSB7 
PuaJiBord Ct? 
Puahword C^E^ 
Pha 

Puahword ELargWindl-S 
Puahwai-d CIS 
puahword tses 
Puahword £13 
Puahword cLasgMindl-! 
Puahword £2S 
Puahword £S0 
PujftKDrd C!l 
Pujliiford tlarijVlndl-2 
Finhmrd £Hauttlindl-l! 
Puahword £50 
Puahwaca tHauttlind!-I2 
Lda £4 

Anop 
Sta Vatl 
_KovaTa 
_LlnaTa 
Lda Var! 
Baa 

Bpl LoopLInv 
PuahLang £PanSlaB 
Sa tPanSl IS 



£HF 
i 

S*l 



62 
D 

Si 



Besaina la aoaaaga d'arrmur a'll oxlate 
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Oza CPointUe aEcr^ur 
Baq N0T00I3 

PvihLong <PoSntMesEz-re'jc 
Fushb^rd <LongTexte 
PushLong iPolnnPec^Inval 
Pushvard LI 

Purhword LSA 

Ldt (PDjncMunOucli 

Beq NoTools 

PvfhLopg ^PolnttJuBtOntil 

tJoToals Afiop 

PushLang <flindErceur 
_EndUpdoco 

SetPorc 
M* 

ActlanCut Entry 

PustiLong <LEHscHafldle 

^LETaEcrap 
RCm 

AcclonCopy Entry 

PushLoHQ •:LERec:HandIe 
_LECBpy 

LEtaScrap 
its 

ActionPast.e Entry 

PushLong <L£Pecliandle 

_LBPniCe 

J! CI 

ActionCiear Entry 

PuahLonij iLERecHondlB 

_LEDslete 

AC.1 

InitBrrDa ESTRi 

ebb 
Phi 

Shortn 
Lda l,s 
Xba 

Ida !.s 
I,on gn 
Plb 

St a ComHovwB+l 

Ida tCadaBct 

St a Inl tErcDa 

_CBtPreflKGS CP_Pa[ai 

Ida Pa tftWane 

Bbq BoGtFrold 

Bra EndJnit 

Bootfroid Anop 

; Draulcan sr^r Iff bureau 



Eadlnlt 



_CecflootVoJ(7S G3V Parma 
Lda Pathnama 
Adc £Pacrina»ef2 
Tty 

Lda PrefOeJcACD 
Dea 

Ldx £PrefDeicflvc'? 
Hvn 0. 

Cic 

iJla PathHaBB 
Ada PretOaacAec 
Sta PathNaaa 

Anop 

Lda Pathname 
Adc EPathnaapi? 
T.v 

Lda i'llenaiBS 
Daa 

hdx CFllcSaicBfi 



GP_Paras 
NunPrBflxA 



PathBufl 
Patbnaaa 



Hvn 0, 
Clc 

Lda Pa [fi Nana 

Adc FUbUbbb 

SCa PadlNoBB 
Plb 

aei 

Anop 
dc 

dc H'PathButf 
Anop 

dc 1-a- 

cte H'PathBuft' 
dc !•!}»• 
da lie 

EUD 



HyOatas 

nyWserlD 

Flleld 

HyPaqeZaro 

PanSlza 
RectLinaEdl E 

TabCaxact 



TabCarac tEnd 



TableEi/ent 



DATA 

da 2 

da 3 

da 2 

ds 3-} 

di >'4 

Anop 

dc I'CtrlF' 
dc i -Ct clH • 
dc I'Ctrll- 
dc i -CtrlU' 
dc 1 -CtrlX' 
Anap 

dc i 'Ctrll' 

Anop 

dc J 'HoActlon' 
dc i'ActlonEvffnt' 
dc I 'ActlonRun ' 
dc j *ActionCuraor ' 
dc i 'ActSonMgnu ' 
dc I 'ActScttUnda ' 
dc I 'ActlonCut ' 
dc I'ActionCopy' 
dc J 'AcLlonPasta ' 
dc I 'Act^onClaar * 



Event Mask 
Event What 
E^antMeasaga 
E^fentt/hen 
EvantVhere 
Evenctiodlfiars da 
TasltData da 
TasliMBre dc 14 

•IDDOODODODDOIOJOJIIIIIIIIJiJJIIJJ' 
LastClickTicI, dl 4 



Anop 
d> 2 
ds 4 
da 4 
da 4 
2 
4 



CllckCounz 
TaakData? 
7asXData3 
TaskDa tat 
LastClickFt 



da 2 
da 4 
da 4 
dl 4 
da 4 



Pra/DeacAcc GaStrlnij 'Syatea:f>eak.Acca: 
Filename GaStrlng 'SyaErrors' 



System Error 
Ressource.S 

' /Hd/Orca / Libraries/Rlnclude/T 

IDefine NumWindErr 52000 
Idefine StatTextO SAQOQ 
idefine StatTextl fAOOl 



Idefine StatTextP SA002 
iOefine HautWindl 74 
iDefine LargKindl 400 
fDefine Mylcon S3000 
(Define LEtmdal S3100 
/Define Rectlnvsl $2500 
reaOMrce rHindParaml INwiUlndErr) 
( 

CTltle*aioue+£ClBse-tfQCantent*(Vi 
s, 

NumHindErr, 
0, 

!0.0,0,OI, 
NumHindErr, 
(0.01, 
!400, 6iO), 
1200, 640i, 
il.l), 
(0.0), 
0, 
0. 

1 125, 1 . 125+HautUind2, l*LatgHindl) 

in (rant. 
NumHindErr, 
RBflaResourcB • S0400tiefIsRasolirce 
•SOlOO-t-ResourceToResaurce 

}! 

resource rpString (NumHindErr) I 
" SysErrors " 

i; 

resource rHindColor (NumHindErr) 
t 

S004O, 
S07E1, 
S0F7F, 
SFOFF. 
SFOFO, 
}: 

resource rControlList 
(NumHindErr) ( 

( 

My Icon, 

LEtmdal, 

StatTextO, 

StatTextl, 

StatText2, 

I.- 

I; 

resource rCantrolTemplate 
(StatTextO) ( 
StatJextO, 
(9.105,20,170). 
StatTextControl ( f 
£FFOO*fSubst i tuteText, 
fctlProcNotPtr+ReflsReaource, 
0, 

StatTextO 
)IJ 

); 

Resource rTextBox2 (StatTextO) i 

"Erreur S" 
).■ 

resource rControlTemplate 
(StatTextJ) ( 
StatTextl, 

f2,296,12,LargUindl), 
StatTextControl I ( 
SFFOO*lSubstituteText, 
fctlProcNotPtriReflsResouice, 
0, 
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Stat Text! 


S-F00000000006000F' 




Push Long LO 


)l: 


S-FFOOOOOOOO6O0OFF- 




NewMenuBac^ 
SttSysBar 
Pushmird £0 


I.- 


S"FFF0D000D6000FFF" 




ResoarcB rTsxtBox2 (StatTextl) ( 


S'FFFFOOOOOOOOFFFF- 




^SBtsolldPenPat 


"Qutii- 


S"FFFFFFFFFFFFFFFF", 




PushALoug 


)! 


S "FFFFFFFFFFFFFFFF - 




SetMonuBaz 


resource rControlTBisplate 


$-FFFFFFFFFFFFFFFF' 




push¥/ord £J 
FixAppisManU 


lScatText2) 1 


i "FFFFFFFFFFFFFFFF" 




VordPeatiJ t 


StatText2, 


S -FFFFFFFFFFFFFFFF' 






(HautUindl- 


S" FFFFFFFFFFFFFFFF' 




Pi- 


10, 0. H^uti/lndl , LargWlndl 1 , 


^"FFFFFFFFFFFFFFFF' 




Drat/MmnuBar 
Ini^Cursor 


StfltTejtt Control 1 1 


5 'FFFFFFFFFFFFFFFF ' 




Jsr WSndPaas 


SFFOO-t fSubstituteText , 


S "FFFFFFFFFFFFFFFF- 




Stz QuitFltj 


f ct J ProcWotPtr+Ref Is Resource, 


S -FFFFFFFFFFFFFFFF- 






0, 


S "FFFFFFFFFFFFFFFF - 


Eoucle principaJe 


Stat Text 2 


S -FFFFFFFFFFFFFFFF ' 




Anop 


>)f 


S "FFFFFFFFFFFFFFFF - 




Jar TestTapWinda% 


); 


J "FFFFFFFFFFFFFFFF - 




UordFvaul t 


Resource cTextBoxl IStatTeKtZ) i 


S "FFFFFFFFFFFFFFFF " 




\S1A Desnoues PaCricJt - 




Pushwoid C$PFFF 


S "FFFFFFFFFFFFFFFF " 




PustiLonQ tEvent 


Revue Pom's (OS/1990] \S11 


S "FFFFFFFFFFFFFFFF' 




T^skMasc^r 


vl . 0- 


S "FFFFFFFFFFFFFFFF- 




Pla 


I.- 


S "FFFFFFFFFFFFFFFF"; 




Beq LaopTftaster 


resource rCant ral Template 


>; 




Aal A 
Tax 


ILEtadal) i 


resource rTuoRects IRectlnval) ( 




Jar fTaskTaole, X. 


LEtmdal, 


132.5,60,395 j , /' Rect del 




Lda OuIcfJff 


1 7,166.20,210), 






BSQ LoopTKaater 


EditLineControl f f 


(21, 233, 28, 400}. /• Rect nom 




des flutJJa 




Fecmetuce 


0, 


outil "/ 






fctlProcNotPtrtReflsResource, 




Shut Dawn 


Entry 


0, 






PushwoFd EP&fTsH 


4, 

LEtmdal 






Pu ah Lang Jni tPet 


^ f f f ^ A 




^ShutPovfiTnala 
Pei <rtyIO 
_SHShutDown 
TLShutDown 


II; 
1: 


r iCiiiis^vxJiXJiMtitciiii 




fiesource rPString (LEtmdall ( 


e59i6 On 




ShartBi 

Lda >SEOC051 


1; 


MainPfogr-flm START 




Longm 


resource rControlTemplate 


Using DaCas 




Ld/t PegisteeO 


IMylcon) ( 


Phk 




Ted 


Plb 




Jal $E100A8 


Hylcon, 


Tdc 






{6,50, 6+23*2,50*32*11. 


St a PegistreP 




dc i4 'QuitPatns 


IconButtonContTol 1 ( 








SoBocd&r, 


" InitSalisttlop dea outlla 






ICfZlc JrOCWO C r t -TTrte Z I SUB SQu ^CS " ^ U U J 


TLStart up 


Jnltpef 


ds 4 


0, 






WordPeaul t 


Eve fit ptanagsr 


0, 








My I con. 


Puliword tHylO 


T^skTatls 


Anop 




LongPsful t 




dc i 'Ignore ' 


0, 


Pha 




dc i ' IgnoF9 * 


0, ' 


Prjsfiuord CPetlsPeaOKiree 




dc 1 ' Ignarm ' 


0. 


PuahLon/j ElnfoToolsSCact 




dc I ' Ignore ' 


f"B", -b",0,OI 

II: 


Stoc^upTools 




dc J ' Ignore ' 






dc S ' Ignore ' 


Sec St act Good 




dc I 'UpdatEttindCM 


I.- 


tfOrdPeaul t 




dc S 'Ignore ' 


resource rlcon tHylconI { 


PuahLong LChlnit 




dc i 'AccJvato ' 


IconColoi, 


PvshLonij tChVlerrj^ 




dc L 'Ignore ' 


18, 
a -2, 


Pua/i Iionfj CChVi pr^& 




dc i ' Ignore ' 


Pvshlang tCftWerge 




dc 1 'Ignore ' 


_n TBXtHourttVoluiae 




dc 1 'Ignars ' 


/• 12395678 •/ 


PI a 




dc 1 ' Ignore * 


S ■•FFFFFFFFFFF5 IFIF' 


BfI Shut Dawn 




dc i ' Ignore ' 


S'FFFFFFFFFFFFFIFF- 


Cftlnit Str 'Errsuf *u chargeiaent ' 




dc £ 'Ignore ' 








S 'FFFFFFFFFFFFiFlF' 


CfiVi^cge sti ' ' 


Task Haster Event 


■J r c f r r r f r f 9 9 f r f r 


StartQoad Anop 






S FFFFFFFF^FFFFFFF"^ 


PU^vora LSI 800*ttifi0l 1000 




dc i ' Ignoto * 




Puahtford C0 




dc J ' Ignore ' 


$"FFFFFFOOOOFFFFFF- 






dc 1 'Inwindot/' 


S-FFFFOOOOOOOOFFFF' 


Pha 




dc 1 'Ignore ' 


S'FFFOOOOOODOOOFFF' 


Pha 




dc J 'Ignore ' 


s FFuOOOOOOOOOOOFF 


Pita 




dc 1 'Menu2B5' 


S"FO00000O000OOOOF- 






dc 1 'Ignore ' 






dc i 'Ignore ' 


$'F0OOOOOOOOOO0O0F- 


Puahuotd LPoflaPmaourcw 




dc i 'DoMmnu' 


S 'FD 0000 00OO06OO0F" 


PuahLopg £r_Ji9nuBac 




dc i 'Ignore ' 
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UnHillta 



LoopDecA 



de J 'Ignore' 




Phji 


Ldx 


Lt tcanZ 


fJc i 'ignore ' 




Pho 


Jsr 


Loaches 


dc i 'ignore ' 




Push word £ 4 


SCx 


HandlconS 


dc t 'IgTiOie' 






SCa 


HandlconiH 


dc i ' ignore ' 




Pushlofig LPectChaSnm 


lOx 


£r Icon J 


dc i "ignore* 




InvalRect 


Jar 


LoadPea 


dc I 'InContral ' 




PushLang CTabl eCol 


six 


Handlcan3 


dC^i 'ignore' 




Push Long CO 


sea 


Handtcanl*! 






Se t FramB Col o r 


Ldx 


£r lean 4 


Anop 




PuafiLang tfimtfi ni^Poms 


Jic 


LoadHes 


Lda TesltOBCa 




Sal BctVindov 


Stx 


Handlcon4 


SBC 




Puafi Long rJuaUindCant 


sua 


Handleon**! 


Sbc C250 






Ldx 


Cr Icons 


Aal A 




RtM 


Jsr 


LaadRes 








SCl 


hondIcon5 




InKlndan 


Anop 


sea 


HandlconSH 






PuatiLong TaskData 






Entry 




set Pom 


— — ' — ^^^-^ Ctialne de caracti 


Push Word £0 




Rts 


Lda 


Er SI ring 


Pushifora ToskDaCa-'-2 






sea 


<Varl 






Anop 


Ldx 


Lc NusnContl 






AC* 


Jsr 


LoadPes 








Six 


TexCBl 


J. 


fit-M L ^ V0 L IT 


Anop 


sea 


Tfxtel*? 






Fit a 


Ldx 


Lr NumConC2 


Cfl/ig^fl psc ie bfTLrcon flndsx X) 






Jir 


Loadftea 


Lda TitSkDBta< 


neii LI J sp 




stx 


TiXCr2 


And ESFFOO 






SCa 


TsxteH2 






rlri r ' Inn/^ rtf ' 


Ldx 


£r HuaConcS 






<fe i 'Ignore ' 


Jar 


LaadRes 


flCJ 




dc i 'Ignore ' 


Stx 


TexCei 






dc J 'Ignore ' 


St a 


Text e 3*! 






dc 1 '»enuJt55 ' 


Itix 


£r NumCanti 






dc I 'HenuAPropos ' 


Jst 


LoadRes 


And ESDDFF 




dc L 'MenuQuJ t ' 


^ClI 


Texte4 


LdK CO 






SCa 


TexCe4'l 




Ignore 


Anop 


Ldx 


£r NuiaContS 


Aj^op 




gca 


Jsr 


Loadffes 


Cap CSIB 






SCX 


TtxteS 


Sec WaJeurrnfJD 


TsftTop»lndo*r 




sea 


TexCeSI-} 


Inn 




HoiilBeault 


Ldx 


£r KcmVBra 


Inx 




LangReaul c 


Jsr 


LoadPes 


Sec 




front Win dot/ 


SCX 


r/uaVeralon 



ValeurlntlO 



Sbc £Sia 
Bra LoopDecA 

Anop 

Toy 

Phx 

Lda TabiaCol,X 
sea <Vffr^ 



; flecfjcrcfte de la pa^ltifjn du bouton 
Lda £0 
Sec 



LoopFotat ion 



Anop 
Por A 
Dey 

Spl LoopRoCat-lon 
Fha 

WordPesul t 

Push Long TaakDa^a? 

GeCCtJ/alue 
Piy 
Pia 
Cpy £1 

Seg JecVaiflUf 

Trb <Var2 

Bra AfflchoVal 

Anop 

Tab <Var2 

Anop 
PlK 

Lda <Var2 

Sto TableCol,X 



: Conversion p/i chainm de caract&re 

FJu 
tra 

Ail A 
Tax 

Ida TBxtml,X 

Clc 

Ado £.15 

Ldx Textai*2 



DoSyaChange 



LaapEnabXm 



AflicheVal 



«SndTypa 
ttBnu2S5 



VindpoBiB 



Gee Wind 
PI a 

CMip Windtypa 
Bnm DoSyaChanqm 

AJ\op 

LdK LFlrstltmm 
St a WindType 
Cap CO 
Bvq SysDtoct 

Anop 

Plix 

Phx 

_EnablmSI tam 
Plx 

Inx 

Cpx £255 

Bcc Laop£nat>l9 

Anop 

Phx 

Phx 

_DlsableHlteti 

Plx 

Inx 

Cpx £255 
Bcc SysDMCt 
Rts 

dx 2 

Anop 
Rta 

Anop 

Iconx POU'S 
Lda Eclcon 
St a <Varl 
IjIx £e_Icon} 
■Jar LoadPaa 
Stx Handlconl 
Sta HmdIconl*2 



Sta NuaVeFslon*2 

Hadile ContcoJ Reaourco-^ Himoiie 
Lda CrControlTBmplate 
sea <Varl 
Ldx CF_fiUBCont:rol 
Jsr LoadRss 
Stx <HandIe 
Sta <Hondle*2 
PushLong £TaCtlsCol 
Push Long £0 
_Sb t Frame Col r 

fenetrv Pams Heaouroa -> H&aaire 
longPesul c 
Push Long £0 
Push Long £0 
Push Long LOrat/Nind 
Push Lang £.0 

Pushvord LPstlsResoucct 
Push Long trUtsmt/indPoms 
Pushvord EcHindParaml 
_RBvWlndow2 
PuJJLong fiuaitlndPoaa 

fenetre des Ch«c/iBox Control 
Longl^esul t 
push Lang £0 
PushLong £0 
Push Long EOrawWindO 
PushLong £0 

Pushuord EReflaPesource 
PushLong £r_HumKtndCont 
Pusht/ocd CrVindParamX . 
_Netfrflndow2 
Pulixy erumVirtdCont 
PushLong tTnfoDsfProc 
PuahLong NuwiHlndCont 
SatlnfoOrav 



toopContral 



AfiOp 

LongRoaul t 
PushLong IfumttlndCont 
Pushvord £SlngJfPtr 
PushLong <llandl€ 
Ret/Contcaii 
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Pulljcy <Long2 

Lda 'LangSS 

Sta <La/\Q3 

Lda 'Lf3nq2§. Y 

St a <Lanq3*2 

Ldy CHocCbld 

Lda 'Lanq35, Y 
Sec 

Sbc £r_AfufflCanCroJ 

Am! a 

Tax 

Lda TableCoior^X 

Beg ValaurNoChange 

Casp LI 

Beq ValeurEgall 



VnHilltieCb 



ValourEijall 



Anap 

Ldy LUscCbHilite 
ShoT tm 

SC» "tono J5, Y 
Longa 

BCB ValBUrNtJCbanga 

Ldy CRecCbCi lvalue 
St a "LortgJS, Y 



Veleu rtJo Change An op 

Lda -HaiidleS.Y 
Inc A 

Chip £r_NUmControIi (16'5} 
Beg EndLaapConti-ol 
sea 'Handles, t 

Lda ^HfindleS, Y 

Crap CFirs^Tab* 
llS'TabHorlgont/ilE} 

Bca ChurgeVtah 
Clc 

Adc IT^bHorliontale 

SCd 'HmdieS, Y 

Brl LoapCortCral 

ChangaVtab Anap 

Ldo CFirstTab 
Sta 'HondleS.Y 
Ldy £CbPmctHaut 
Lda 'Handle§,Y 
Clc 

Adc ElnterLlgnm 

sea 'Handled. Y 
Mri Loopconri-oi 

EndLoopControl Anop 

Pusht/ord £-J 

Puafluord £rCon t roJ Tempi acs 
Pushlong Cr fiumContiroi 
_R# J e asefie^o ut ee 
PushLang tiunUindPoKB 
_Shoi/Hliidov 
PushLong NumftindCont 

Shounlndov 
PuahLong HuxWindCont 

PushLang ttumWlndCooC 

Set Pact 
Pushvord £J 
_SetFontFlaga 



DrmMnd 



MtntiAPropoa 



Anop 

Jsc DrawCh^ln9 
Anop 

LongPeault 
^GKtPact 
_Ora wCon trol s 

Anop 

longlfBsul t 

Get Port 
Push Lang NuaWJndPoita 
_jBtPorc 



LaapPxap Anop 

Stx <Vari 
PuahLanQ Hand! con J 
Pml <Varl 

puihwocd aofisa 

Puiftuord EJS-!J 

PitahUonq Handlcanl 
Pel eVarl 
PuihTO'riJ C74tlS0 

_Drat/!con 
Push Lang HandlcanS 
Pel <Var! 
Puihfard tl4Af!S0 

_DtouScon 

PushLanq H/tndlconl 
Pel tvjirl 

Puahwaca C15-li 
_pr-awIzon 
PMShLortg HendlcanS 
Pel tVarl 

Plx 
Cu 

Bfffj EndApropos 
Bfl LoopProp 

EndApropas Ajiop 

_SgePBcC 

KCJ 

WenuOuit Anop 

Lda C~l 
Sla OflrFlg 

Loadftes Anop 

Lon^Reault 
PeJ tforl 
Puahtfocd £0 
Phu 

_^Loa dPea ouece 
Pullloug fHandiB 
Ida 'CHanaieS 
Tax 

Ldy LI 

Lda '<HaBdle§,Y 

HCl 
AflOp 

Lda IFlcitTBbat: 
Sta <VaIl 
Lda £'F' 
Sta iVar? 

Anop 
Pes fVarl 

PushKara HVcabChltfieHC 

MoveTo 
"pel <Var! 
_OravChar 
Lda tVac! 
Oea 

Cmp C'A--1 
ana ItsAipha 
Lda £'9' 

ItsAJpha Anap 

Sta <Vacl 
Cap fO'-l 
Beq EndLoapDc 
Lda tVail 
Clc 

Ada LTabHorlzontaiv 

Sta <Varl 

Bra LoopDeavChar 

EndLoopDc Aj\op 

PuihKard £TabHorCll 
Puahuacd IVCabColerDC 
_NoraTo 

Puahlong Textal 



DiavChalna 



LoopDra wCha r 



_DcawStelnq 
Push Word EfabrforCh 
PuiAwoca tVtabColarDC-t 
(JncerLlgDC'll 
_MoveTo 

Puahlong Texte! 
_Dravstrlng 
PuiflKord £Ta£jHora 
Pushiord IvcabColorDC* 
llntarLiijDC-H 
_HoveTo 

Pushlong Texte3 
_DfawStFing 
Puifilfard tratiiai-ch 
Puahiford LVtahCoiorOC* 
(IntacLlgOC'3> 
_HqvsTo 

Pushlong TaxtBi 

DzanStrlng 
PujfiWord CTabHorCh 
Pushword EVtabColacDC* 
(TnCei-LigOC-tl 
_HavaTa 

Puahlong TaxtaS 
_OratfStrlng 



: — Bazre d* infozmation 



InCaOafPrar: 



Anap 
Phd 

Lda PvgiMtreD 
Tea 

Lda InfoBar*S,a 

Sta <Long3i-2 

Lda in!aBa[,s 

Sta <Long3 

Phb 

Pkk 

Plh 



Cent r ago du texts 
Sac 



Lda 



tdy tReatlBaialt 

Ida 'Lani]3S,r 

Ldy CtleetlBCauctle 

Sba "LonjJS, y 

Cic 

Rnr A 

Sec 

sac tS23 
Pha 

Long3S 

Adc £9 
Pha 

_HDVeTO 

PuahLang IfumVcralon 

DrawStclng 
Plb 
Pid 

Lda l.s 
Sta 1-fH.s 
Lda 1.3 
Sta 2tl2, a 
Tsc 
Clc 

Ada t.11 

Tea 
BtJ 



Frame Color 

ressources.S 

/include '/Porns/Libr^irie /Types. Re z' 

/' Startup Record •/ 

/define InfoToalaStart 1 
resource rToolStartup 
llnfoToalsStart) ( 

madeSiO, /• master SCB •/ 

( 



Pom's n'' 49 



3,S01O0, /* mise tools */ 


h- 




"Copier" 


4.S0100. /• qulckdraw •/ 


resource rMenuItea (Apropos ID 1 ( 


): 


5, $0100, /' desk manager •/ 


Apropos ID, 




resource rPString (CollerlD) 


S.SOlOO, /• eventMgr •/ 


"?', 




"Coller" 


/• 7, $0100, /' scheduler •/ 


0, 




1; 


/• a, $0100, /' sound tools •/ 


OxBOOO-tfDivider*fBold, 


resource rPString (EffacerlD) 


/• 9,50100, /■ ADB tools •/ 


AproposID 




"Effacer" 


/• lO.SOlOO, /' SANE •/ 


h 




j ! 


11, $0100, /• int raath */ 


resource rMenu Item (Qui tterlD} { 




, 50300, /■ Uindoti Manager '/ 


QuitterlD, 




IDeflne NumfiindPoms SPOOO 


15. $0300. /• Menu Manager '/ 


-Q-, 




^Define PomsTextl SI 000 


16,S03OO. /• Control Manager •/ 


0, 




^Define FrameTeittl Si 001 


IB, $0200, /' QD flujT "/ 


0x8000. 




i Define Iconl S^OOO 


19, $0100, /' print manager '/ 


QuitterlD 




IDefine Icon2 S3001 


20, 50100, /' LineEdlt tooJ set •/ 


1; 




iDefine IconS $3003 


21,50100, /• Disiog Manager */ 


resource rMenuItem (AnnulerlD) 1 


tDefine IcanA S3Q03 


22,50100, /* Scrap manager */ 


AnnulerlD. 




iDefi ne IconS S3 004 


23,50100, /• standard file ■/ 


-Z'. "z*. 




t'Qsa u rWi n dPa mm I 


27,50100. /' Font manager •/ 


0. 




(NumWindPoms, ResPreLoadJ f 


23,50100, /• list manager •/ 


0x8000+ f Divider* f Disabled. 


f Allocated* fOContenttf Alert, 


34,50100, /■ text edit •/ 


AnnulerlD 




/• Frame Bits */ 


/• 29,SOIOO, /' ACE '/ 


}1 




0, 


/' 32,50100, /• Midi Tools '/ 


resource rMenuItem 


ICouperlD) ( 


/' title ID •/ 


/• 25, $0100, /' NoteSynth ■/ 


Coupe r ID, 




0, 


/* 26, $0100 /• Note Seq •/ 


~X". -Jt", 




/• ref Con '/ 


1 


0, 




ID. 0.0.01 


)! 


OxSOOOtf Disabled, 




/ " 7tinm R/T-t '/ 

t u^^vjrF J > C 1.r 4j f 


/, rMenuBar -/ 


CouperlD 







/define MenuBarlD 51000 


I; 




/• color tahl e Ld ■/ 


idefine AppleMenuID 1 


resource rMenuItem 


ICopierlDl ( 


to OJ 


/define FichierMenuID 2 


CopierlO. 




f \A J- IJ ^ M J / 


Idefine EditMenuID 3 


"C", -C-, 




(400, £401 , 


Idefine AnnulerlD 250 


0, 




/ * fin t it f i * f 


Idefine CouperlD 251 


0x8000+ f Disabled, 




(200, 640) , 


Idefine CoplerlD 252 


Copier ID 






Idefine CollerlD 253 


1; 




1 * ' J / ' 


/define EffacerlD 254 


resource rMenuItem 


(CollerlD) 1 


y • f/i 11 a Ttn f fn f~ Hitr vp 

f k_r i. \J _1 _1 £3 J 1 Z\J LJ I I Li ^ J £ u J_ f V J_ 


idefine FermerlD 255 


CollerlD, 




iO,Oi, 


Idefine AproposID 256 


"V, "v". 




/• page amount ■/ 


Idefine OultterlD 257 


0, 




0, 


resource rMenuBar fMenuF=rID} ( 


Ox8000*fDivider+f Disabled, 


/• win fa Ref Can */ 


f 


CollerlD 




0. 


Appi eMen uID, 


I! 






Flchie rMen u ID, 


resource rMen ultetn 


(EffacerlD) f 


{ 1 flfl, 20, 2 93 f 620} f 


EditMenuID, 


EffacerlD, 






;/ 


"D-, -d-. 




i n fz'on t r 


I; 


0, 




/ * wP 7 A nf> • / 


resource rMsnu lAppleMenuID) f 


DK3OO0*f Disabled* fDi wider. 


n ilii' rlJ-U Or Clin S f 


AppleMenuID. 


EffacerlD 






OxAOOa, 


I.- 




^^■5 o u zee ToRe JO u rcc 


AppleMenuID, 


resource rPString 


(AppleMenuID) I 




1 AproposID }; 


-[1- 




1 - 


); 


1; 




t vi^ijtj I Lit ^ C-L vJ JpxSL 


resource rMenu IFichierMenuia) I 


resource rPStrlng 


(FlchierMenuIDI ( 


(NusnWindPotJiSf ResPreLoati) { 


Fi chlerMenuID, 


" Flchier ~ 




f 


OxAOOB, 


i: 






FichtazMenuID, 


resource rPString 


(EditMenuID) f 


Icon?, 


{ 


" Edition 




Zcon3 


OultterlD 


1; 






1; 


resource rPString 


(AproposID) ( 


Icon5f 


).■ 


"A propos ..." 




PomsText 1 


resource rWsnu (EditMenuID) f 


1; 






EditMenuID, 


resource rPString 


(QuitterlD) f 




OxAOOB, 


'Quitter' 




J; 


EditMenuID, 


1; 




1 ■ 

/ * 


( 


resource rPString 


(AnnulerlD) f 




AnnalerlD, 


"Annul er' 




(FrameText 1 , ResPreLoad) ( 


Coupe I ID, 


>,- 




FzaioeTextl, 


Copier ID, 


resource rPString 


(CouperlD) ( 


(0,0,90.0*270), 


CollerlD, 


'Couper' 




StatTaxtControHf 


EffacerlD, 


1: 




0, 


1; 


resource rPString 


(CopierlD) [ 


fCt IProcNa tPtr*ReC IsPe sou rce 
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0. 

FraiBoTeKtl 

t)! 

): 

resource rTeytBox2 

IFrameTextl .HssPreLoad) I 
TBCenterJust 
TBFoceColoF 
TBColorS 
TBFont 
TBVenlce 
-\SOO\S1B~ 
TBStyleOutline 
TBSt/leShadow 
"Apple //GS' 

I; 

resource rControI Templa te 
(PaasTextl, ResPreLoad) I 
PomsTextl, 
11,30, 12. 30*200}, 
StatTextCantrol ( { 
0, 

f CtlProcWotPtr-'Ref TsReaource, 
0. 

PomsTextl 

II: 
I; 

resource cTextBox2 

IPomsTextl , SesPreLoadI ( 

TBCentecJust 
TBStyleltalic 
TBForeColor 
TBColorS 

"DESNOUES Patrick S" 

I; 

resource rCantrol Template 
( Iconl , ResPreLoadI ( 
Icon J, 

i-1, 7*250, -1*41, 7f250r69l, 
IconButtonControl I ( 



Ican3, 

(3,139*250,3*31, 133*250*841, 
JconButtonControl ( f 
Squd reBut ton-'WoHorder, 

/Ct JProcNoCPtr+fctJKantaEvents+fie 
lIsResa urce 'SOOlO, 

0, 

Icon3, 
0. 
0, 
1, 

f-M-, "m-, 0, 01 

11: 

I: 

resource rControlTemplate 
llcon^. ResPreLoadI i 
Icon4, 

! 0,215*250, 0*19, 21 5*250*451, 
I conButtonCont rol ! ( 
SQua re Bute on *NoBorde r, 

fCtlProcNotPtr*fctlUantsEvents*Re 
flsResaurce'$0020, 

0, 

Icon 4, 
0. 
0. 
1, 

r-", "'",0-0) 
II: 
Is 

resource rControl Template 
l!con5, ResPreLoad) I 
Icon5, 

! 0,2 51*2 50, 0*33, 251*250*65 1, 
IconButtonControl ( I 
Square But ton *NoBo rder. 



S"0F999999999F00000a000F999999F0- 

S'OF999999999FO000O0000F99999FOO- 

S-0F999999999F0000O0O00F99999F00- 

S'0F999999999F0a0000O0F999999F00- 

S-00F99999999F000OOOOF999999F0O0' 

$"D0F999999999FFO00FF9999999F000" 

S-0OF9999999FF99FFF99999999FOOOO" 

S'OOF999999F99999999999999F000OO" 

S-00F999999F9999999999999F000000' 

S'O0F999999F999999999999F0000000- 

S'00F999999F99999999999F00D00000' 

S-00F9999999FF9999999FFO0O000000' 

S -00F999999999FFFFFFFO000O0OOO0O" 

S ■■00F999999999F000000000000000O0" 

S-00F9999999999F000Q000000000000- 

5-00F99999999999F00O000000O00000" 

S-00F999999999999F00Q00Q00000000' 

f-OOF9999999999999FOOOOOOOOO0OOO- 

S'OOF9999999999999FOOOOOOOO0OOO0" 

S'00F99999999999999F00000000000Q" 

S"0OF99999999999999FOOOOOOOOOOOO~ 

S~OOF999999999999999FOOOOOOOO0OO' 

S~00F999999999999999FO0OO0OOOOOO' 

S'000F999999999999FF0000O00O0000'' 

S'0000F999999999FF00000O00000O00' ' 

$"0O00DFFFFFFFFF00O0000O00000000', 

5 -OFFFFOOOFFFFFFOOOOOOOOOOOOOOOO- 

$"F9999F0F999999FFFFFF0000000000- 

S"F99999F9999999999999F000000000' 

S"dF9999999999999999999FFddooSoS- 

S-0F999999999999999999999FFO0nOO' 

S-OF99999999999999999999999F0OOO- 

S"0F999999999999999999999999F000- 

S"0F999999999999999999999999F000" 

S-0F999999999999FFFF999999999F00" 

S"0F99999999999F0OOOFF9999999FOO~ 

S"OF9999999999F00O0OOOF999999FOO~ 

S-0F999999999FO0O000OOOF999999FO~ 

S-OF999999999FOOOOOOO00F999999F0- 

S~0F999999999F000000000F999999F0- 

S-0F999999999F00000000QF999999F0' 

S'OF999999999F0OOOOOO0OF999999FO' 

S"0F999999999F000000000F99999F00- 

!~0F999999999F000000000F99999F00' 

S~0F999999999F00000O00F999999F00- 

;-00F99999999FOOOOOOOF999999FO0O' 

S"00F999999999FF00DFF9999999F000~ 

S-00F9999999FF99FFF99999999FO000- 

$"00F999999F99999999999999F00000' 

S-OOF999999F9999999999999FOOO0OO' 

5-O0F999999F999999999999FOOOOO0O' 

S-O0F999999F99999999999FOOOOOO0O- 

S"00F9999999FF9999999FF000000000" 

S"OOF999999999FFFFFFFO0OOOOOO0OO" 

S~OOF999999999FOOOOOOaOOOOOOOOOO~ 

S-0DF9999999999F0000000000000000- 

S'00F99999999999F000000O0OO00000' 

S-OOF999999999999FOOOOOOOOOO00OO~ 

$ -OOF9999999999999F0000OO00OOO0O' 

S-00F9999999999999F00D0000BO0000- 

S'00F99999999999999F000000000000' 

S"00F99999999999999F0000000O00Q0" 

S~OOF999999999999999FO0OOOOOOO00' 

S'00F999999999999999F0000000000O- 

$~OOOF999999999999FFO0OOO000O00O" 

S'0000F999999999FF0000000000O000' 

S-00000FFFFFFFFF00O0000000000000~! 

I: 

Resource ricon I Icon2, ResPreLoad) { 
IconColor, 
27, /' fiautrsur ■/ 
30, /■ Largeur •/ 



SquareButton *NoBorder, 

fCtlProcNotPtr*£ctlWantsEvents*Re 
fIsResource'SOOlO, 

0. 

Iconl, 
0, 
0, 
1, 

l-p-,-p-,0,OI 

I ): 
I: 

resource rCon t roJ Temp J a t e 
IIcon2, ResPreLoad) I 
Icon?, 

n. 69*250, 1*33, 69*250*731, 
IconButtonContral I f 
Squa reButton*Noaorder, 

£CtlProcNotPtr*{ctlHantsEvent3*Re 
fIsResource'SOOl 0, 

0, 

I con 2, 
0, 
0, 

1, 

CO', -a-, 0,01 

II: 
I: 

resource rControlTemplate 
(Icon3, ResPreLoad) I 



fCtlProcNotPtr*fctlWantsBvenl:s*Re 
fIsResource'fOOlO, 

0, 

Icons, 
0, 
0, 
I, 

{-S-, ■s-,0,0} 

II: 
I: 

/• Icones */ 

Resource rIcon llconl, l^sPreLoadl ( 

IconColor, 

41, /• Hauteur •/ 

30, /• Largeur •/ 
/• 1234 567B9ABCDEF01 234 S67e9ABCDE 

SIE^SO •/ 
S-OFFFFOOOFFFFFFOOOOOOOOOOOOOOOO- 
S'F9999F0F999999FFFFFF0000000000" 
S'F99999F9999999999999F000O00000~ 
S-OF9999999999999999999FFOOOOO0O- 
S-0F999999999999999999999FF00000- 
$-0F99999999999999999999999F0000' 
S'0F999999999999999999999999F000~ 
S'0F999999999999999999999999F0DB" 
S-0F999999999999FFFF999999999FO0" 
$-0F99999999999FD000FF9999999F00- 
$"0F9999999999F0000000F999999F00- 
S-OF999999999FO0OOOOOOOF999999F0- 
S'0F999999999F000O00000F999999F0- 
S"OF999999999FOOO0OOO0OF999999FO' 
S-OF999999999FOOOOOOOOOF999999F0" 
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/• l23456789RBCDEF0l231567B9/iBCDE 

S'QOOOOOOOOOOOFFFFFFOOOaOOOOODOa- 
S'OOOOOOOOFFFFaasaaaFFFFOOOOOOOO" 
S'OOOOOOFFaaaaaaaaaaaaaaFFOBOOOO' 
S"0000FFaaaaaaf3aaaaaaaaaaaFF0000~ 
S'OOQFasaaasaaaaaaaaaaaaa^aaFOOO'* 
S'OOFaaaaaaaaaaasaaaaaaaaaaaaFDO" 
S " OFaaaaa a ciaaa a aaaaaa a aaa a aa/iaFO" 
S'OFaaaaaaaa^aaFFFFaaaaaaaaasaFO" 
S'OFaaaaaaaaaaFOOOOFaaaeieiaaaaaFO' 
S'FaaaaaaaaaaFOOOOQOFaaaaaaaaaaF" 
S"F33aaeiaaaaF00O0O000FaaaaaaaaaF'' 
$ ~FaaaaaaaaaF0O0O00O0Faaaaaaa^aF" 
S'FaaaaaaaaaFOOOOOOOQFaaaaaaaaaF' 
S'FaaaaaaaaaFOOOOOOOOFaaaaaaaaaF" 

S'FaaaaaaaaaFOODOOOOOFaaaaaaaaaF' 
S'FaaaaaaeaaFOOOOOOOOFaaaaaaaaaF' 
S"FaaaaaaaaaaFOOOOOOFaaaaaaaaaaF" 
5" OFaaaaaaaaaaFOOOOFaaaaaaaaaaFO" 
$"OFaaaaaaaaaaaFFFFaaaaaaaaaaaFO~ 
^''OFaaaaaaaaaaaaaaaaaaaaaaaaaaFO'* 
S "OOFaaaaaaaaaasaaaaaaaaaaaaaFOQ" 
S"OOaFaaaaaaaaaaaaaaaaaaaaaaFOOO' 
S"OOO0FaaaaaaaaaaaaaaaaaaiiaF0ODO'' 
i "OOOOOFaaaaaaaaaaaaaaaaaaFOOOOO" 
$-O0OOOOFFaaaaaaaaaaaaaaFFOOOOOO' 
S-OOOOOOOOFFFFaaaaaaFFFFOOOOOOOO' 
S'OOOOOOOOOQOaFFFFFFOQOOOOOOOODO", 

/' = 27 '/ 
S'OOOOOOOOOOOOFFFFFFOOOOOOOODOOO- 
S'BOOOOOODFFFFaaaaaaFFFFOOOOOOOO' 
S'OODOOOFFaaaaaaaaaaaaa^FFOOOOOO- 
S"OOOOFFaaaaaaaaaaaaaaaaaaFFOOOO' 
^"DOOFaaaaaaaaaaaaaaaaaaaaanFOOO" 
$ "OOFaaaaaaaaaaaaaaaaaaaaaaaaFOO" 
S''OF&aa^aaaaaaaaaaaaaaaaaaaaaaFQ " 
S''QF aaaaaaaaaaaFFFFaaasaaaaaaaFO " 
S "OFaaaaaaaaaaFOOOOFaaaaaaaaaaFO" 
$ 'FaaaaaaaaaaFOOOOOOFaaaaaaaaaaF' 
$'FaaaaaaaaaF0000O000FaaaaaaaaaF' 
S"FaaaaaaaaaF0O0O00OOFaaaaaaaaaF- 
S"FaaaaaaaaaF00000O00FaaaaaaaaaF~ 
S'FaaaaaaaaaFOOOOOOOOFaaaaaaaaaF" 
S"FaaaaaaaaaFOllOOOOOOFaaaaaaaaaF'' 
S"FaaaaaaaaaFOOODOOOOFaaaaaaaaaF'' 
S"F aaaaaaaaaaFQQQQOQFaaaaaaaaaaF" 
S "OFaaaaaaaaaaFOOOOFaaaaaaaaaaFO" 
S"OFaaaaaaaaaaaFFFFaaaaaaaaaaaFO" 
S "OFaaaaaaaaaaaaaaaaaaaaaaaaaaFO" 
5''00FaaaaaaaaaaaaaaaaaaaaaaaaF00" 
S "OOOFaaaaaaaaaaaaaaaaaaaaaaFOOO" 
S'OOOOFaaaaaaaaaaaaaaaaaaaaFOOOO" 
S'OOOOOFaaaasaaaaaaaaaaaaaFOOOOO" 
S"0OOO00FFaaaaaaaaaaaaaaFFOO0OOO" 
S'ODOOOaOOFFFFaaaaaaFFFFODOOODOO" 
S-OOOOOOOOOOOOFFFFFFBB0O0OOOOOOO~! 

>; 

Resource ricon ITcon3, HesPreLoad) ( 

IconColoTf 

25, /■ Hauteur •/ 

36, /• Largeiir '/ 
/• 

123456789ABCDSF0123tS67S9ABa}EF01 
234 $24=36 */ 
S'OFFFFFFFOOOOOFFFFFFFFOaOOOFFFFFFFF 
00- 

S"FasaBSe8FF0FFeee388eSFF0FF38eSSBBS 
FO- 

S"F8B88a88S8Fa8S8 38888 388F3838 83388 8 
FO- 

S"0F38B 3338888888838388838 33388 8888 8 



8F" 

S'OFS 888888888333883338333838 3888 886 
3F- 

S-0F3 38883 3888 3838333883888888888888 
8F" 

S"0FBS838 3888 388888888 38S8383838383( 
3F~ 

S"0F38B3388SSFFS888eS888FF8Sa838383e 
BF' 

S-OF8B388833FODF338888SF00r888Be83Ba 
BF- 

5-OFB383B388F00F883838BF0OF33Se33888 
BF' 

S~0FS88SaB88FO0F38e3338F00FS8SBaeaaS 
BF" 

S"0FB3aB8338F00F8838388F00Fa88883833 
3F- 

S"0F3883838BF0OFeea8888FO0F8B8388338 
8F- 

S~0FBe8aaB83F0OFB38B838F00F8838S8S88 
BF" 

S~00F888BE883F00F3833383F0OF8 8888888 
BF' 

S"00F3888B38BF00F8888a88F00F33833883 
SF" 

S"00F38888aBBF0OFBSB38B3F00F3aa38B83 
8F" 

$'D0F8888aa88F00FB38883aF00F38 888888 
8F- 

S~00FB88888BBF00FB3888a8F0QF8B888S33 
BF" 

S"00F8eaaa88BFO0FB3B8338FO0FB83aBB3B 
Sf- 

S"00F8ea8a88BFO0F3888838F00FaB38aB8a 
BF- 

S"00F8B33883BF00F888883BF00F8B388838 
BF~ 

S"00FBeaa8BFF00a0F88838F0000F3 888888 
FO- 

S"OOOFea9rF0OO0OOOFB83F0O0O00FaeB3BF 
00- 

S"000OFFFO00D000000FFF00000000FFFFF0 

00-, /• = 25 •/ 
^"OFFFFFFFOOOOOFFFFFFFFOaOOOFFFFFFFF 

00- 

S-F8e8aB8BFFOFFa38B8aB8FF0FF88BB8833 
FO" 

$"Fa8aBBe88BF3388838ae88aF883BB83838 
FO" 

S"0F38B333888aBBB88BB3388B388838888B 
BF- 

S"0F88B 33883838888888388838883388388 
8F- 

S~0F8B 883883388888888888838383633883 
BF- 

S-0F8B 888838383336888888888838383888 
8F- 

S-0F83388B38aFFBBB8B8838FF3B83BB8363 
BF" 

}~0FB88BB8B8F00F8B8B838F00F88aB8888B 
BF' 

S'OF38B33a8aFO0F8888388F00F8888B3838 
BF- 

S-0F8B38ae8aFO0F88Sa383FO0F888388B3B 
SF- 

S "OFaaBBBaBBFOOFB 3 388 SBFOOFSBaSSB 88 8 
BF- 

$"0F36 88888 8F00FSB88BB8F00F338S 33883 
BF- 

S-0F88388B3BFDaF3B833a8F00F88B8B8888 
BF" 

S-O0FB38B88BSF0OFB8BB883F00FB8388838 



8F- 

S-0OFB8a8B888F00FB88888SF0OFS8B3S38B 
BF- 

S-'00FS3888SB3F00F88BBB8aFOOF88 888888 
8F- 

S"00F888888a8F0DFB8888SeF00F8888B88B 
BF- 

S-00F8888aB88F00F8a88833F00F833a38B3 
BF- 

S "D0F3B383888F0OF88BaB8aFOOF83a838B3 

aF- 

S"00F8S88aaS8FOOF8B3B38SFO0F83B8B888 
3F- 

S"Q0FB88BaaBBF00F8B3388BF0OFe8888e88 
BF- 

S"00F88aB38FF00OOFBBBa8FO00OFBa88B88 
FO- 

S"000FBa9FF0O00D0OFaa8FOO00O0F888aBF 
00- 

S"0000FFF00OO0000OOFFF0O0000OOFFFFF0 
00-! 

^■ 

Resource rrlcon !Icon4.ResPreLoad) ( 

IconCoIor, 

13, /• Hauteur •/ 

16. /' largeur */ 
/' 123456789ABCDEF0 SJ0=I6 */ 

S-OODQFFFFFFFFOOOO" 

$-0 OFFddddddddFFD - 

S - OFddddddddddddFO " 

S -FddddddddddddddF ' 

S -FddddddddddddddF - 

S-OFFddddddddddddF" 

S'OOOFdddddddddddF- 

$ -OOOFddddddddddFO ' 

S "OOFddddddddddFOO- 

S"OFdddddddddFFOOO- 

S -FdddddddFFFOOOO " 

S"FdddFFFFOOOOOOOO" 

S~OFFrOOOOOOOOOOOO", /' =F3 */ 

$-000 OFFFFFFFF 0000" 

$"OOFFddddddddFFOO" 

S -OFddddddddddddFO " 

S "FddddddddddddddF " 

S -FddddddddddddddF- 

S - OFFddddddddddddF - 

S'OOOFdddddddddddF- 

$ -OOOFddddddddddFO - 

S -OOFddddddddddFOO • 

5 -OFdddddddddFFO " 

$~FdddddddFFF0000O- 

S"FdddFFFF0000000O- 

S-OFFFOOOOOOOOO'OOO',- 
I; 

Resource rican ! 1 co n5, ReaPreLoad I ( 
TconCalor, 
27, /' Hauteur '/ 
26, /' Largeur •/ 
S-OOOOOOFFFFFFFFFFFFOOOOOOOO" 
S-OOOOFF55555S555S55FFFO00OO- 
$-00FF555555S55555S5555FF000- 
$-0F5S555 5S55555555555555F00" 
S-F5555555555555555S555555F0- 
5 "F5555iS555555555555555555F" 
5 -^555555555555555555555553^" 
?-F555555J555S5S55S5S555555F- 
S-0F5555i555555555FFF55555F0" 
S~00FSS5S55555555F00£)F555FD0" 
S"00DFf5S55555555F0000FFF0D0- 
S-OO00DFF55555S555FFDDD0D0D0" 
$ -0000000 f F55555555SFFO0ODCO- 
$-0O00OO000FF555555555FFO000- 
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S'OO00O0O0O0OFFS5555S555Fr0O~ 
S~O0O0OFFF000O0FF55555555'5FO' 
S-ODFFFS55FFFOOOOF55555555F0- 
S-0F5555555SSFOOOOF555555S5F- 
$-F555S5555555FOO0F55555555F" 
S'F55555555SS55FFF555555555F- 
J-F555 5555555555555553555551^- 
S-F5555555555555555555 5555F0" 
S-0F555555555555555555555F00" 
S"00Fr5555555SSS5555555FFD00- 
S"£J000FF5555555SS5S55FFD0aOO" 
S-OD0D00FFS555i5555FF£lD00ClOD" 
S'OOOOOOOOFFFFFFFFFOOOOOOOOO', /• 
=27 •/ 

S'OOOOOOFFFFFFFFFFFFOOOOODOO- 
S~0000FF5S5555555555FFF00000~ 
S-tJ(JFF55555SS555S5555 55FF0a(;" 
S-|)F55555555S5555555 55555F00- 
S"F555555555555S5SSS555555F£I" 
S"F55S5S5S5S555555555555S55F' 
S-F5555555SS55555 5555555555F- 
S-FS555S555555555555555S5S5F- 
S"0F5555S555555555rFF55S55F0" 
J-00F55555 5555555F0D0F555F00- 
S-0D0FF55S5SS555 5F000OFFF1700- 
J-0[JD00FF5S5S55555FF0i;O000O0" 
S-£)000000FF555555555FF00t)0f)a" 
S-OOODOOOO0FFS55555555FFOOOO" 
S"000(3l3000l?00fF555555555FF00' 
J "00000FFF00D00FF5555555S5F0" 
5-00FFF555FFF0000F5555555 5FD- 
S"0F5555 55S55FDD0aF55555555F" 
S-F55553S5S5S5F000F555 555SSF" 
S-F55 5555555555FFF555555555F" 
S"F5i555555555555555555SS55F" 
5-F55S5555555355 5555555555F0" 
S-DF5S5535S55555555555555F00" 
S-00FF555555555S5 555555FF0DD" 
5"tl0(JDFF55555S55S5555FF00D00" 
S"000(?0OFF55555S5S5FFi:J0£)D000" 
S'OOOOOOOOFFFFFFFFFOOOOOOOOO"; 

i: 

/• — Fenetre des controles -'/ 
IDefine NomMindCont S2002 
IDefine WumControil SSOOO 
resource rWindParaml 

lHumUindCont, ResPceLoad) ( 
lAllocated+iCt ITie* fin fa-' f eContent* f 

Zoom' fFlex-tfCco>l*fRScioli+f Close* 

fTitle, 
NimsnindCont, 

/• title ID '/ 

0, 

/• ref Con •/ 
(41. 10, 140, 629-23), 
/• Zoom fleet -/ 

0. 

/• color table id '/ 
{0.01, 

/' origin •/ 
1100, 6401, 

/* da ta size •/ 
(100, 640), 

/' max height-width */ 
11,11, 

/• scroll amount, tior.ver '/ 
10,0). 

/* page amount */ 

0, 

/• Hinfo Ref Con •/ 
14, 

/' vinfo height ■/ 



(41, 10. 140, 629-23). 

/• window Position •/ 
infront, 

/' wPlane 

0. 

/» Control Ref •/ 
ReflaResource 'SI 00 
/• descriptor */ 

).- 

resource rpString 

INumUindCont, ResPreLoad) I 
" FrameCaloi " 
I.- 

/•-Mod)le de case I? cocher -*/ 
resource tCantcal Tempi ate 

INumControll, ResPreLoad) ( 

NumControll, 

(15, 7, 0, 0). 

CheckControl f f 

0, 

fCtlPracNotPtr-tfctlUantsEvents-iRefIs 
Resonrce, 

0, 

UumControll, 

0, 

0, 

I--, '".0. 0) 

II; 
I; 

resource rpString 

(NunControl 1 , ResPreLoad) < 



I; 

/. 

tDeiine NumContl SHOO 
/Define NiimCont2 SllOl 
fDefine NtimCont3 51102 
IDefine NumCont4 }1103 
IDefine NumContS S1104 
resource rpString 

(NumContl , ResPreLoad) 
-FrameColor - JOODD" 

I; 

resource rpString 

(tluisContZ, ResPreLoad) 
■•TitleColar - SOOFO' 
I.- 

resource rpString 

fWumContJ, ResPreLoad) 
"zBarCalor - SOFOF" 

I; 

resource rpString 

(NumCont4, ResPreLoad) 
'grouColor - SFOFO- 

I; 

resource rpSt r i ng 

tNumContS, ResPreLoad) 
"InfoColor - SOOFO' 
I; 

IDefine NuuiVers S120Q 
resource rpString 

(WujnVers, ResPreioadJ 
" Version 0. 1 ~ 
i.- 




Problemes de transferts 
de ficMers entre 
Macintosli, IBM PC et Apple II ? 



InterPom's transmet tous types de fichiers entre 

les trois types de machine, en local ou a distance 

par telephone via Minitel. 

Et sans perdre les lettres accentuees... 

Et sans erreur de transmission (protocole ALC)... 

Et surtout simpleraent, intuitivement. . . 

Dccjmenlation sur demands d : 

Editions MEV • Tel, : HI 39 51 24 43 • Wnitel ; HI 39 53 04 40 • Fox : (H 39 49 54 65 



Erratum 

Page 23 du n" 46, la macro <ba — > comporte une erreur lypographique dans 
la premifere ligne : lisez j = peck i, au lieu de j peek i. 

Sur la disquetle n" 47, le programme Phone dcvait Stre accompagnfi d'un 
fichier "T' que nous avons malenconteusement oublie. L'errcur est rfiparSe, et 
vous trouverez ce Schier sur la disquette n° 48. Nous vous prions de nous en 
excuser. 
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iMerry CftarCes 



L'apparition depuis 1986 de la 
possibilite d'avoir des fichiers de 
demarrage (communement appeles 

Mlt m eas¥§) e; m plu§ ^'m\¥ 

augments la taille de nos dossiers 
systeme, allonge notablement la duree 
de la phase de demarrage. A ce 
propos, essayez d'enlever juste une 
fois tous vos INIT/cdev et 
redemarrez, vous verrez la rapidite 
avec laquelle votre bureau 
apparaitra... 

Le buldecet INIT Fortune, qui existe dcja sous diffdrcntcs 
formes dans d'autres sysifimes d'cxploiiaiion icl Unix, esi 
de fairc palicnier ruulisaleur par unc pclile hisloire drole, 
philosophique parfois, doni il pourra se dtSiccier pendant la 
durce {parfois fon longuc) du diimamigc. 

n exislait dcjk un cdev appclfi .'Fortune dc Arthur Britlo, 
mais qui a quclques probl6mes dc compaiibiliifi. De plus, il 
n'dtail pas possible d'y ajoulcr des riSflexions dc son cru, ou 
en [out cas pas trfcs facilcment (ii 6tait au moins nficessaire 
d'Scrire un programme). Ici. non sculcment la compatibilild 
esl plus grande mais, en plus, Ics fortunes. pr6scntcs dans 
un fichier k pan, peuvenl cire fidiidcs. On pcui cgalemcnt en 
ajoutcr ires facilcmcnl. il suffit pour cela d'avoir I'utilitaire 
indispensable qu'esl ResEdil. 

Pour le moment, I'lNIT se coniente dc choisir aleatoircmcnt 
une pcnscc ct dc I'affichcr. Un dclai dc icmporisation d'unc 
seconde et demi intcrvicnt, puis le processus de boot 
continue, exficulant les auu'es INlT/cdcvs, et ceci en laissant 
le tcxteaffiche. 



Les Fortunes 



Les pcns&js soni stock6es sous forme de ressources de type 
WS7S. II s'agil cn fait d'une liste de chaines de caraclferes, 
avec ccnaines possibiliiiSs diffdrenies du type de ressourcc 
standard pour crecr un liste de chatne : le type str i. 



D'abord, un texie de fortunes doit pouvoir bien sur dfipasser 

la laille des 255 caractferes, qui est la limite pour une 

siring Pascal. II faul done palier ce problSme en utilisant 

non plus un length byte mais un length integer. Ce type est 

dcfini comme Slant un word string. La ressource permettant 
uciiiii Luiiiiiic cliiJii uii wulu iinn^. i-d ic^suuii-c pi^iiiiL^iuuii 

dc stocker une telle chaine est mstr, homologue de la 
ressource 'str' pour les strings Pascal standards. 11 fitait 
absolumcnt impossible de stocker un pens& profonde par 
ressource, etant donn6 la lenteur du resource manager d6s 
qu"il s'agit de manipuler des fichiers ressources de quclques 
ceniaines de ressources diffdrentes. Comme on veui pouvoir 
ddpasscr plusieurs milliers d'en-tnSes, il Staii tout S fait 
impossible d'adopter ceue option. 

Le mieux itail done de crecr une ressource pour les '»str\ 
equivalcnte a la 'str*'. mais pour les word strings. II a 
fallu pour cela creer sous ResEdil, la ressource template 
{'tmpl') ayani pour nom 'wsTt' et d6finissant ainsi le 
masque de saisie d'une lisle de chaines de caiact^res de type 
'wstr' : 



TMPl "tirsT"- ID - 1049 Irom ResEdil 



Lohal 


HutiStri ngs 


Type 


OCMT 




■*•«• 






LabBi 


•»•* 


TypB 


LSTC 




• *«*■ 






Label 


The siring 


Typo 


USTR 










Label 


««*•« 


Type 


LSTE 




•■•*• 







II faul cgalemcnt icnir compie du probl6me de la mfimoire 
occupdc au demarrage et ce qu'cntralnerait le fait d'avoir 
toutcs les blagues dans une seule ressource (avec, malgrc 
tout, la limite due au fait que le compleur du nombre de 
chaines esl code sur un enlier, ce qui "limite" le nombre de 
chaines de caractSres a 32 767 dans une seule ressource). 
Done, pour des raisons d'espace mfimoire uiilisS par I'lNIT 
au demarrage, on s'obligera S limitcr k 100 au maximum le 
nombre de chaines dans une ressource, ce qui fail en 
moyenne une ressource avec une laille de 20 S 30 Ko. 
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Le m&anismc de liiage alcatoire consistc done en Ics dlapes 
suivantes : 

• ouverture du fichier contenant les fortunes, doni le nom 
est contenu dans la ressource 'stf ' d'lo 12B, presenlc 
dans riNlT fortune. Ce fichier doil £trc present dans le 
dossier systeme ; 

• lirage aldatoire d'une ressource 'wsr#" paimi lous les 
fichiers ressources ouvens (I'lNIT lui-mcme comicni 
quelques pensdes dans le cas oil le fichier principal nc 
serait pas prfiseni) ; 

• tirage aleatoire de la plaisanterie dans cette ressource 
particuli&re {il est bien sur lenu compte du nombre de 
blagues rfiellement prdsentes dans cette ressource IS) ; 

• fermeiuredu fichier. 



Autres parametrages 



On peuL modifier la police de caract&res ei la taille dans 
lesquels sera affichS le texte de la fortune, lis sont siockes 
dans la ressource 'stbi' d'/o 12s et est modifiable sous 
ResEdiL Voici la ddfinition de la ressource au formal Rcz : 

resource -STRH • il2ai i 

I /' arrsy StringATray: 2 elements •/ 
/' 11! V 
"Monaco", 

/' 121 •/ 
"9" 



Mst ring; 



/• String '/ 



Le fichier suivant d&:ril le Make du projcl Fortune : 

* File: Fortune. make 

§ Target : Fortune 

I Sources: Fortune. p Fortune. r 

t Created: Tuesday 18 June 1990 0:20:29 

Fortune. p. o f Fortune. make Fortune. p 
Pascal Fortune, p 

Objects = Fortune, p. o 

Fortune. Code f Fortune. make lObjectsl 
Link -w -t 'rscC -c 'RSED' d 
^Objects) 3 

"I Libraries j"Funtiirte, 3 3 
" I Libraries I "Interface .o d 
■■fPLibraries}"PasLib.o d 
" iPhibrariesi"smi.Llb.o d 
-o Fortune. Code 

Fortune ff Fortune. Code Fortune. r Fortune. rsrc 
Rez Fortune. r -o Fortune -t 'INIT' -c -Joke' 

Le fichier ressource Fortune.r sc contcnie d'lnclure le fichier 
ressource auparavanl crce par RcsEdil Fortuncrsrc el Ic code 
fiSndrc par le compilaieur ci Ic linker : 



file: Fortune.r 



11 est dgalemcni S notcr que la taille du rectangle grisd dans 
lequel s'affiche la blague est calcuide en fonction de ce 
caractere cl de sa taille. ainsi qu'& pariir du nombre de lignes 
dc la blague et de la longueur maximum d'une ligne. 



include "Fortune. Fsrc"; 
include ".^ort une. Code 



Envoyez vos Fortunes k la revue Pom's. D&s qu'un certain 
nombre de nouvelles histoires auront t\& accumulees, une 
nouvclle version de Fortune sera aJors publifie. 



MPW 



Cet INIT a etfi rdalis6 en MPW Pascal, mais il est tr&s 
facilcmeni portable cn Think Pascal, sunout si vous eies 
I'heureux acquSreurdela version 3.0. 

On irouve ^galemeni dans cet envtronnement la possibililc 
de traiter les ressources sous la forme d'un fichier texie 
source facilement &iitable. On pent meme (comme dans 
ResEdit, mais de fa^on plus dvoiufie) d6fmir des masques 
pour \cs, nouvelles rc'^wurces que Ton crSe. C'esi Ic cas ici 
avcc la ddfinition de la ressource 'wsri/', que Ton voit ici au 
format Rez : 

type •wsm ■ ( 

integer = SSCauntof (StringArrayl ; 
array StringArray f 
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Exemple de ressource au 
format Rez decrivant quel- 
ques fortunes 

lesouice 'liSTC (3B«, "French ( Other Fortunes", 
puiqcatile) I 
i /• array Strl4ig\rray: 19 eleiterts */ 

/* HI '/ 

" ykccrwrebbaJ ehT\n\n sevot yhtil' 

"s etit drid iqilUib sauT'Vn :ebaii eh: " 
"nl eltml^ dna eryq illD\n .seiioqoc* " 
'ehc eiew ysnlm llA\n .ebdigt^io shta" 

"r ejTvm eht dnAVn\n Idllhc ym ,kcawcebbd~ 
"J ehc srdweB\"\ii Jhctac taht swale ehc " 
■pEtlb take Ariaj phT\n nuhs dna .dcib " 
"buiJbiiJ eht eiaw3\n \"' Ihctansreilnaa " 

"suoljmiff ehT\n\n rflnah drcHE laprov " 
"reh kcot ehSXfi - thguoj ehs eof effoxnan " 
"eht emic gnoLVn .Bert jnucmuT eht yh eh" 
"3 Lietser oS\n rthquoht nl elihua do" 

"ocs diiA\n\n .dcMts ehs thquoht hslffu ni" 
" sd ,dnA\n ^ejtifllf £o seye htiw , kcoHreb" 
"baJ BhT\ti .doow yeqlut eht hguoihl qr" 
"iifflh* emaC\n lenac U sa delbru' 

"b dhA\n\n hquorht dtia hguorht dnA Inwt ," 
"enO loirt ,enO\n Ikcsns-iekcins tnaw ed" 
"alb lapiov ehftn daaii sCl htlw dna ,dae" 
"d tl tfel eji5\n -kcab gnlhpjraliaq t" 

"Hen ehs\n\n ?kcDWrebbaJ eht nlals uoht t" 
"sah djiAV"\n ilriq hsijiia^ ym .sirtrs ym o" 
"t emcCNr. \"l(allaC: IhoollaC !yad suojb" 
■"art 0\i; .yo] rch nl deltrohc e" 

"hS\n\Ti sevot yhtils eht dna jgilllrb sau" 
"T'\n :cbaw eht ni elbnug dna eryg diD" 
"Nn .sewiqorci) eht eren ysirnsi llAVri 



.^atqtuo shtar emcn eht (taA\n\n 
- lAvls Carroll", 

/■ 12] V 

"D^out, les dainn^s de la terre. \nDebout 1" 
"es forgacs de la famij VriLa Haisor tonne e" 
"n son cratere, \nC'est I'^tuptlon dp la Fa" 
~lin,\n\TiDu passe, [aisons table rase, \nFoule" 
" esoiave, debouti nebaut!\nLe monde va oh' 
"anger de bB5c,\nNoLjs ne ^oiiriea rlen. soyo" 
"ns toutl". 
/• 13] •/ 

" ?Ptograjniie uilntiresiant', 
/• It] •/ 

"?Eiror Blthin an error". 

/* ;5i •/ 

"Le m^cln a qui vous tirez Ja lanqire vo" 
"us le fera payee oher. mon petit. \n 

" - Chavai", 
/• 161 V 

"Na iTussion est de tuei le tenps et la si* 

"enne de me tuei a !on tour On est tout ' 
"a fait a I'stse entte assassLnsAn 

" - E.M. Cioran\n*. 
/• i7| •/ 

"La lulsofi sacelUie directe avec le Kre" 
"mlln fonccionne depuls ce natin,", 
/• |B| ■/ 

"Veronese n"aualt pas Sti inult* au repas" 
" Chez lei/y, 11 le ecBpasa d'aprSs des ra" 
"cotitat5-\h 

- Chavai", 

/' [3] •/ 

"Cinon donna le sein a Pero devant Bubens" 
". c'esi ce que ]e lui repcoehe,\n 



■- Chavai". 
/■ (IQI ■/ 

"La crfiation fut le premier acte de sabot" 
■aqe,\n 

(E.M. CiDcanI". 
/* nil */ 

"Xetoxej voQS donnela vie. si voufi la per" 
"de? vous en aure£ une ct^jje.". 
/' lUl '/ 

"Puisque toute& cos choses r>DUB depassen.:" 
". fejqnans d'en fitre les orqantsateurs. \li" 

" Jean OICTEM]". 
/■ [131 •/ 

"Ouand le pain est inouill* il faut le bol" 
- Chavai", 

/■ |H] ■/ 

"Tu crois pas que tu en as asset Calt pou" 
"r aL]ourd'hui?". 
/• 1151 

"'Jn home qui le respecte n'a pas de patr" 
"le. Une patrie, o'est de la qluAn 

- ' E.H. Cloran". 
/• 1161 V 

"One la force aoit avee toi!", 

/■ im ■/ 
"Think dirty!". 
/• IIBI •/ 

"Cercei terre elue des ringards, province" 

" hant^ par les cerceux. les oacochcs et" 

" les vivantes ribondes. En r4allt6 tenta" 

"tive de myth! float Ion de la boite.\n 

" [Andre Fredenquer, 

i 

I,- 



Source Pascal de I'lNIT 



Uiii L F crtunePoms; 



Inteface 
Uses 

MenTypes, QuictiUcan, OSrntf, Toollntf, Packlnll; 



Procedure Fortime; Fomard; 

Inplenentation 

Const 

JokeRsrcType- 'MSli'; 
Type 

FotitStalB - BecDtd 
font 
teae 



! Integer; 

! Style; 

; Integer; 

1 Integer; 

Integer; 

; tcnqlnt; 

: RGBColor; 



Size 

Justification 
color 
RCBColOr 
End; 

InteqetPtr- "Integer: 
IntegefHdi= " InlegerPcr; 
Procedure GeclIndwSTIVat theSt ring: Handle; Var tbeleJi; Integer; 
jtrl.i5tl[):integer; indeii:lnt.egerl ; Fomard; 
Function hCenierBect (MainBeci, snterBect :Ppc;l 'Seci; Potvard; 
ColortBExists: Boolean; Forward; 

fGelliKlstritiglthelD.ThelndciiiInteijerl iStr255; forward; 
fStclngToIntlthBStrlnqiStr255| ; Integer; Forward; 
fGetSt ring (the ID: Integer 1 :5tr!55; Forward; 
Procedure GetFontStatelOnthePor: :GtatPtr; Var TheState:FcffitState) .- 
Forward; 

Procedure SetrontStatefOnthePorC ;CrafPtt;TheState:"ontStitel.- Forward; 

FllSStm EgEttMtilRSimiEEil!?; tjlR^illi IHElif: FSStl^i 

Functlai GetMaKNuirberOfChars (theScrlngr Handle): Integer; Forward; 

I — 1 

Procedure Fottune; 

Ij procedure prlnclpale- 



oIdA5: Longlnc^ 
UieTeinjPort ; GratPti.- 



Function 
Funcilnti 
Fund ion 
Function 



theMainPott: GrafPtr; 

Jo)!eTextRect: fleet; 

theStclng. 

thcHsrc: Handle; 

theLen, 

ItieFontNum. 

jQlesrilelleftiuiii, 

thsRsrclndex, 

chein, 

the Index, 

nuffOf JcjJtes I nThis Ri rc. 

numberOELlnes, 

ir^n Kumbe rO f C ha rs , 

Linefleiqht. 

hSlie, 

thePesult: Integer," 
theType: HesType,- 
dumstr! SttJiS; 
theFontState : FontState: 
theFontlnfo: FontlnEo; 
theSysKec: EysEnvRec; 
theOelayT Longint; 
Begin 

Hal^lZone; 

Hocetesters; 

InitGcaf(JthePortl; 

InltFonla; 

InltWlndare: 

InltDialqqslNil); 

InlcWnua; 

Inltcursor; 

TEimt; 

Fliish£vents<evei^vent, 0); 
UideCursor; 

theResult:-SysEnvlfona(l.theEysSec) ; i Version I shouldn't fall 
GetFontScaie (ihePort, theFontStatel ; 
GetSateTlme IrandSeed) ; 
CetFNumltGetlndStringaiB.ll.CheFontNum): 
ToxtPoBtlthaFontUuml; 

TescElielfStrlngToInKfEetlndStrlnglUS.!))); 
Ge I Fon t In f 1 thePmit 1 n to) ; 
Hith theFontlnfo Do 
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IheResult :-SetVol (Mil. theSysRec.sjsVIietHunl ; 
JokasFlleiieflln^-OperResFlle (fEetSCclnq 1128) ) ; 
raiiiiierH:-Co«rCf(esouiceslJo]ieFis[cTypel: 

theFWcclnde>;;-«>s IHandcffl) mH nmifSTRi tliflRsri:Inde«:-cBeRsrcIr(fe)til: 
theRscc:-GetIndtesciicoe(jDkeFistcType,lheRsrclndex| ; 
Get Ren Inf oftbeRsrc. ihelD, ttieType. dumSCcl ; 
iimiiOfJoliBSlnTMsfisrc:-InceqerHdlltheftsccr'; 

thelndex:-tlielr>(lex*l,' 

Getnn*eTiclieS(:clni3,thiil*n,theI0,tl\eIiideji|; 
nuj*etOfLUies:^cNuiberOfLjneltheSt rlngl; 

PenNonnsl; 

hSlzei-lS-tliuxNmiiMrOfQiars'lChel'ontlnfo.wlEtUji)); 
If hSlieJbOO 

Then hSlie:-bO0; 
EetBect IJokeTentRect, D, 30. Il31ie,40t (LinBliBlqht:»miiiiberOG.lnes| ] ; 
JoliETeiiliRecl: ^-hCenterReci (screenBlCs.bowids, JokelfeKCRect ] ,- 
EraseTiect (JoiieTexti!ecE ) ; 
IiuetSect (JokeTeiUiect.2,!l; 
PenSLzel2.:); 
PenPet Igray) ; 
FraireRecl-lJolieTeiltRectl; 
InselHecl: (JokeTexIRecL, 1, 4) ; 
c iQseRBsF llP(JokeiFlleasnjLm); 
MockltheStrinq),- 

TeiitBox([he5C[lng*,chelen,JolIeTeitl<ect.TEJlistLert),- 

HtJnlocKthaStrlnql; 

SelFoniEtaie (chePDii:, theFoncStace) ; 

Delay llQD.theCf^Igy); 

End; 

1 1 

Function GetNunberOfLine UheStrinq: Handle}: Integer; 



Pcocedure GeClIndWST{ V^r cbeStrlng ^Handle; Var thelen: Ititeqer; 

£trlj5EID: Integer: index: Integer) ; 

I 

Senvole dans ' thestcljiq ' et 'ttiel*n', la chalne prfsenCa dam la 
lessoiice 'HSTC. ayanr pour id 'thelD', et itant a la pcsitlan d'lDdei 
'tlielnde«' . 



RenvDle le naiijre de litres que contlent le handle tsuc du tex;e) 
t)teSt[Ug. 

var 

1; Lcngint; 
CheCountr Irteger; 
Begm 

Gett.'uiitierOtLine;-!; 
I! tlwSttlngoNll 
Then Begin 

HLocliltheStj'ing) ; 
ILheCount:>0; 

For 1^=0 to GetHandleSlieltheStringl Do 
If ordlPtrlOrdfl (ttieStrlng'l t:| '|=13 

Then theCmn[,'=Sui:c|theCount|; 
Get»uiiterOfLlrLe:=Su[:cltlieCount); 
HlInlock(theStringl; 
End; 

End; 

I ________ __ I 

Function Cet)tij(NuniterOfChars jtheScrlng; Handle): Integer; 

I _ . _ 

nenvoie le ncnbre de lignes que contient le )iarKfle isMr du texte) 
theString. 

— " — , 

Var 

1: Lotiglnt; 
tneHdX, 

charCount; Inteqet; 
Begl^ 

Get HaaiiitbciO tCha ra : -I i 
If tbeSttingoNU 
Tben Begin 

ILocliItheStrlng); 

tlieHax:-Oi chalCount ["D; 
For ::-0 to Oe t Handle slieCheSt ting I Do 
If aid(P[£(OidMtheStclng")tl)')(>n 

Hien chartoLint:-Euce(tliaiCounC) 
Else Begin 

If CharCountJtheKai 

Then thefttx:=charCount/ 
CharCounti-O; 
End; 

GetHaiiNunt»rOfChars:<-theltaI; 
HDnlock (theString); 
End; 

End; 

I _ ] 



-) 



DumWSIrHdl; Handle; 
BumMStrPtr: Ptr; 
ttMSm; Integer; 
CurStrU^; Integer; 
Begin 

DmiHSt rad 1 : ^t ResDDCOe ( JclieRs rcType. sc rList I D) ; 
NMSnii-IntegerHdl IDuK«StclWl|"; 
H lndei<-*i«STH 

Tlwn Begin I ok, 11 y a ca String la 1 

HLwk IDunMStrKdl) ; 

aNof>urge(Bmi«E[rHdl); 

DmiiMStEPtr;-€ur*StrHdl*; 

0mWStrPtr:-Ptr(0rd4 (CunWStrPtrl (J) ; 

CiiiElrlng:-l; 

While Curstrlng<iTidex Oa 
Begin 

niinKStrPtt;-P[tfOtd4(lhin*BtcPtr)<-lntegarPtr|Diii[il«trPtr)"+; ( Slie of 
lengtll Hard 1 1 ; 

Cu rSt r Ing : =CurSt ring *I ; 
End; 

thalen ; =IncegerP tr (OuraWSt rPt r 1 " ; 

[lieStj:ing:-Heweandle(theIfin); [ Size cf the long 

St ling I 

HLocXItheStringI; 

DuiiiWStrPtr!-Ptc(Ord'f (DimWSttPlr)-'!! ; 

BlockrtovB IDuJfMSttPtf, TheString". theLen) : 

tlUn lockltheString); 
KUnlock (DunMStrHdl); 
^rge(DLimWS[rHdl),- 
Fnd 
Else Begin 

T!ieStrlnQ:-ml; 

tneLen:=0; 

End; 

End; 

1— I 

Function hCenterXectlMalnRect, EntecRect;Rect) :Rect: 

I ■■- ■ — 

Jlistlfle le rectangle 'EnterRect' par capport a Nainitecr sur 
i'horlzontale. 

— ■ . . I 

Var 

width, height, 

ScreenHldth.ScreenKelght; Integer; 
FirstPt.SecondPt :Polnt; 
WDclJlect:Ract; 
Begin 

With EntetRect Oo 
Begin 

W[ith:-rlght-loft; 
End; 

Kith HainPect Do 
Begin 

ScreenWidch: -right-left: 
End; 

FlrsCPt.h:-(ScteeiiWdth-widUi| Dlv I; 
FirstPt.V:-EnteiRect.Ccip; 
SecondPt.hi-FlrstPt.h'width; 
Sec ondPt ,v:-EnterRect.bottaii: 
Pc!Bect (F IrstPt, Second? t.Morkaect I ; 
If l*>rWlcct.cop<24 

Then WorlmeeI.tcip:-29|* 
hCen[etRECt:-WorkRect; 
End; 



Function ColorQDExists: Boolean; 



Renvois true si ColorQuickDraw exlste, false ainoi^. 
— ^ 

Const 

RCMBbLoc - S2SE.- 

TVoHlghNask - 3C009; 
Type 

WordPtr - "Integer; 



Suite page 57.. 
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Partager son dur avec 
celui du voisin — qu'il ait 
un Mac, un PC (avec 
*TOPS DosTM) ou qu'il 
travaille sur station Sun 
(#TOPS SunTM)_ est 
facile lorsqu'on possede 
*TOPS. 

La messagerie, les 
mailings, les boites aux 
lettres, les conversions de 
fichiers, avec mots de 
passe ou non, 
fonctionnent 24 heures sur 
24 a la vitesse "grand V", 
grace *TOPS 
FlashBoxTM, qui accelfere 
trois fois la vitesse de 
transmission du reseau 
AppleTalk. 

*TOPS Spool™ vous 
permettra d'imprimer en 
tache de fond, pendant que 
vous travaillerez sur le 
fichler de Tun de vos 
collaborateur. 
Si vous voyez une fenetre 
surgir, c'est que quelqu'un 
vous envoie une lettre ou 
un note de service par 
I'intermediaire de #TOPS 
InboxTM, veritable centre 
de tri qui sait, pour vous 
prevenir, patienter 
jusqu'au petit matin 
8 heures s'il le faut, 
lorsque vous avez du 
courrier mais que votre 
micro est eteint. 

Si la place vous manque 
toujours sur votre disque 
dur, pourquoi ne pas 
installer les fichiers ou 
applications sur le dur de 
votre voisin, tout en 
profitant de ceux-ci sans 
qu'ils ne vous prennent 
tous les precieux octets 
dont vous avez tant 
besoin ? 



Installer #TOPS 

Parmi les disquettcs qu'on irouve 
lorsqu'on ouvrc pour la premifere fois 
la boite, deux son[ parfailcmenl 
ideniiques, k I'excepiion du petit 
numdro qui se trouve au dos. 

*TOPS est fourni pour deux 
ulilisateurs au moins ; 3 chaque 
uulisateur correspond un numcro qui 
va permeiu-e & ixOPS de le recon- 
naitre sur le rdseau (ccla exclul bicn 
evidement que deux personnes 
puissent s'inscrirc sur le mcmc r6seau 
avec le meme num6ro), L'instaJlaiion 
est I'enfance de Part, puisqu'il n'y a 
rien d'autrc S falre qu'i doublc-cliquer 
surl'icdne Insiailer, 




Installer 



puis cliquer sur les boulons Installer 
et Qiduer lorsque c'esl termind. Vous 
Sies d'ores ct dfiji sur Ic reseau (qui 
ii&:essite au moins deux personnes). A 
partir de cc moment, 4T0PS est en 
accessoire de bureau ei vous allez 
pouvoir communiquer avec vos 
pancnaires. 



TOPS DA 

A rouverture apparait une fenfetre fixe, 
sur laquelle figurenl voire disque dur et 
le reseau sur Icquel vous allez, soil 
publier un dossier, soit pouvoir 
travailler sur un dossier qu'un autre a 



pubiid. Meme si vous n'avez pas lu la 
documentation, le fonciionnement esl 
assez insiinclif el I'aide en ligne 
rficilement bicn faiie. 

En cliquanl sur le bouton Aide, une 
pciiie fenetre apparaTl. vous donnant 
votre numfiro sur le rdscau et des infos 
gdnfirales sur #TOPS. Si vous 
sfileciionnez ce meme boulon en 
insistant un peu plus longuemcnt, un 
pop-up menu ^ un seul item apparilit, 
el vous donne une aide beaucoup plus 
dStaill^; : plusieurs fenfetrcs apparais- 
seni (une par boulon) chacune d'elles 
donnant accfes k loutes les infor- 
mations sur chaque fonciion, avec un 
ascenseur. Ainst. quelle que soil 
I'op^raiion que vous etes en train 
d'effcctuer, une aide vous est 
accessible. Cela va meme plus loin 
car lorsqu'un dossier, un serveur, ou 
un disque dur, est siSlcciionn6, 
*TOPS vous donne les informations 
le concernant. A I'usage, vous 
dficouvrirez vite des raccourcis-clavier. 



Ouurir 



Cette fonciion vous peniiet, du coi^ de 
voire disque dur, d'ouvrir el d'aller 
chercher n'importe quel fichicr ou 
dossier, Elle vous permel dgalcmeni 
de changer voire nom sur la lisle des 
serveurs. #TOPS dtant parfaiiement 
cohfirent avec I'interface Macintosh, 
les doubles-clics et auires raccourcis 
sont bien eniendu acceptes. 

Publier 



Publier, c'est melire des ressources, 
telles que des fichiers, des im- 
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primantes. ou tout autre periphSrique ^ 
la disposition d'aulres stations du 
rdseaiK. Pour les fichiers, ce peul Stre 
avec ou sans mot de passe, h scrip- 
teurs unique ou multiples (c'est-&-dire 
que le premier qui acc^ it un fichier 
serveur possfede le droit d'&rire, les 
autres y acc<£dani simultan^ment ne 
I'aiu'ont que dans le cas des scripteurs 
multiples). Une fonction sauvegarde 
vous fivite de devoir publier voire 
dossier h chaque fois que vous 
rallumez voire Macintosh, 

"flttacher ] 

Afin de disposer d'un fichier ou d'un 
dossier filoignfi comme si c'6tai[ le 
v3trc propre insialld sur voire disque 
dur, la fonction "atmber" ne demande 
qu'ii eire cliqu^e pour installer ce 
dossier sur voire bureau au meme titre 
qu'un disque ou une disquctte en li- 
gnc ; il apparaitra avec I'icone : 



TOPS 

Bien eniendu, I'op^ralion est 
m^morisable pour eviter de la renou- 
veler k chaque rcdfimairage. 



(J) Zones 



Les zones sont des sous-ensembles 
logiques d'un groupe plus large de 
r^seaux inierconnecifis ct reliiSs par des 
ponts. Elles permetlenl de subdiviser 
un rdseau important (secrfiiariai, 
comptabilil6...). Cette panic s'ouvre 
comme un dossier. Apparaissent k 
rinlfirieur toutes les personncs ayant 
mis un fichier, un dossier, ou meme 
tout un disque dur en accds au r^seau : 
les serveurs. 



Serueurs 



Ce sont les stations mettant leurs 
ressources (lelles que fichiers, 
imprimantes...) k la disposition 
d'autres stations du rdseau. Depuis 
raccessoire de bureau, vous pouvez 
copier des fichiers de voire Mac vers 
un serveur, ou vice-versa. Vous pour- 
rez convertir un fichier en format 



lexte, et le visualiser depuis voire 
NDA. MacLinkPlus/TOPS est pour 
la traduction des donntSes en diffdrenls 
formats (PC, Mac, Unix...). 



TOPS 




TOPS Spool 



#TOPS Spool vous permei 
d'imprimer sur une LaserWriter ou 

compatible tout en iravaillant simul- 
tan^ment sur d'autres documents. II 
est 6videmcni compatible avec les 
zones el ponls du r^seau ainsi qu'avec 
les polices de caraci&res tfilfichar- 
geables ; son installation est aussi 
rapide que *TOPS NDA et ne 
necessile pas de Mac ni de disque dur 
dddig. 

#TOPS Spool est compatible avec la 
commande Print ou Cmd P, vous 
aurez acc&s dirccicmeni au Spooler par 
le menu Vous pourrez de \k, 
indiquer I'heure de debut ci de fin 
d'imprcssion, arrctcr une impression 
en cours el imprimcr une page de 
couvcrlure qui indique "quand-ou- 
commcni-quoi-par-qui" sur ce qui est 
imprimd. Si I'impression venait h 
s'arrCier pour une quciconque raison 
(ces petiies choses qui n'arrivenl pas 
qu'aux autres hfitas, un "planiage" par 
exemple), <TOPS Spool garde en 
memoirc les laches d'impression et 
reprend voire impression 1^ ou clle 
s'^tail inierrompue. Pratique en cas de 
mailing, jc peux vous I'assurcr. 

Depuis n'imponc quelle application 
au standard Macintosh, vous pourrez 
envoyer vos impressions sur un 
fichier *TOPS de file d'atlenie qui les 
redisiribuera lui-mcme sur les 
differentes imprimantes du rescau, 
m&me sur la Linoironic qui se irouve 
k irois cents metres de ik, dans une 
autre zone. 




Sof^Talk 



Dans I'ensemble, #TOPS fonctionne 
bien. I'aide en ligne est en fran;ais, 
d'accfes facile. Le tout est rapide, 
except^ quand vous avcz le malheur de 



vouloir lire un fichier alors que son 
serveur est en train de travailler ou 
d'imprimer (sauf en [ache de fond) ; 
prenez done voire mal en patience, 
voire Mac vous a eniendu el fera tout 
ce que vous lui direz... bienldl ! 
#TOPS prend 275Ko sur le disque. 
#TOPS Spool en prend 677. ils ne 
prfisentent pas d'incompalibililiS avec 
le Finder, mais quclques u-aces d'hu- 
mour dans la personnalisation des 
serveurs par des icones inattendus (le 

mien est une torlue, c'est vrai que 
mon Mac Plus n'a pas la prestance 
d'un Mac ni). 




TOPS hBox 



*TOPS InBox se prfisenie en 
accessoire de bureau ou en application, 
c'est un logicicl un peu lourd, mais 
ccia vaui la peine ; il est irfes 
astucieux. efficace, rapide el confomie 
aux normes dc I'inierface du Mac. 

Inbox n'est rCellemenl inlfiressant que 
quand vous 6tcs un certain nombrc sm 
un rdseau, disons plus de u^ois, il Test 
encore plus si voire rdseau est partagfi 
entre diffSrents standards. L'installer 
est louie une fipopce, surtoui que la 
documenialion et I'aidc en ligne sont 
en anglais (j'ai d'ailleurs fait appel au 
service d'information technique de la 
Commande Electronique que je vous 
recommande vivemcnt). La presen- 
tation k I'dcran de I'aide ei de 
r installation est redouiable, a croire 
que ce ne sont pas les memcs 
pcrsonnes qui ont fait cetie panic et la 
partie applicaLon k proprement parlcr. 



Ses capacites 

Inbox aulorise jusqu'a 20 boltes aux 
lettres sur un meme r6seau, Inbox 
Plus en aulorise davaniage et dans 
certain cas. la communication avec 
d'aulres systfemes dlecironiques de 
courrier. It vous permeltra prin- 
cipalemeni : 

*^ d'envoyer et recevoir des "mdmos" 
et des "mfimos l616phone" ; 
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boiie aux lellres publique est acces- 
sible par tous & la lecture comme ^ 
I'dcriture. 

Vous pourrez trier tous vos messages 
par sujet, cxp^diteur, date ou status, 
vous pourrez aussi les stocker dans des 
"storage boxes" ou dossiers, comme 
bon VOLS semble. Vous pourrez 
figalement effecluer des recherches dans 
vos anciens messages selon des 
criteres lel que : Commence par... 
Fini par. . . Conlienl. . . 

*TOPS sait aussi gcrer les fenetres 
{memoriser les laillcs el les positions) 
et les polices de caracleres (il vous sera 
possible d'installerceilede votrechoix 
parddfaul). 




Sof^Talk 



Tout cela fonctionne irfes bien. 
cependant il est i rcgrctter que #TOPS 
nc dispose pas d'unc fonction sonore 
pour prdvenir des fivcntuelles tran- 
sactions cntrc stations. L'acccssoire de 
bureau est. 5 !a pratique. Equivalent k 



un appe! i I'application, ce qui esl un 
peu long au dcmarrage et n'autorise 
pas I'emploi simultan6 avec une autre 
application (il faul quitter par #-Q), 
sauf sous Multi-Finder, Mais on 
supporlera d'aitendre quelques instants 
lorsqu'on ddmarre ou que Ton quitte en 
^change du temps que Ton peut 
gagner. 

Son insidieux fichier *TOPS prep 
provoque des Error -91 dhs que vous 
essayez d'imprimer depuis une 
application quelconque, et vous aurez 
beau Ic glisscr hors du dossier systfeme 
et rcddmaner (non sans pester, au bout 
de la Nieme fois), rien n'y fait. J'ai 
done retirfi tout Inbox pour vous 
im primer cet article, Hormis ccla et en 
resumd, *TOPS inBox est un acces- 
soire de bureau complei et puissant, 
vivemeni qu'ii .soit en frangais, pour 
que Ton puisse en profiler pleinement. 

#TOPS 3.0 esl un produil diffuse 
par La Commande Electronique, 

disponible chez lous les revendeurs. 
Prix : 2 900 F TTC. 





✓ d'cnvoyer et recevoir des fichiers, 
documents ou applications ; 

✓ de ranger vos messages et les relire 
quand bon vous semble ; 

✓ d'envoyer des "copies carbone" it 
d'autres personnes que voire 
premier correspondant ; 

✓ de trier vos messages par dale, 
sujet, cxpfidilcur ou status ; 

✓ d'incorporer des fichiers lexte dans 
vos messages ; 

✓ de disposer d'un camet d'adresses, 
avec Icquel vous pourrez faire un 
mailing ; 

✓ d'cnvoyer tous les memos qui 
scront automatiquement (ou non) 
sauv6s et imprimis. 

U vous permeiira en plus de faire des 
recherches dans voire courrier Elec- 
tronique avec des criieres de sEIecdons 
tels que : Commence par... Fini 
par. . . Contienl. . . 

Chaque boitc aux Icttres esl accessible 
depuis le Macintosh de son uiilisateur 
(avec mot de passe ou pas, au chotx), 
mais aussi depuis un autre, a condition 
de connailre le mot de passe. Une 

SuUe de la page 54. 

ColotODE:ii:s:s!.|BltJuidl'Al-, IwoHlEjhrtisXl-Ol ; 
End; 



Funoiion tGecIndSttlnq Ithe ID, The IndM; Integer] ;Str25i; 
I 

flftnvole le String present dans £4 resource SHH d'ld 'thelD'. i 
I'lmJex 'thelnden' . ArkI en interne i la proeMnif GeilnilSElng 
(UCillUes Toolbox) 



DwStr:Str2ii: 
Begin 

GetlndStrlnq (DiMStr, thelD, Tlie Index) i 
fGo t IndSl ring ; =DiiraSl: r ; 
End; 

i — 

Functlor tStrlngTolnt (tlvBStrlnq;Str355) :Inteqet; 



ronctlon renvoyinc I'^teger contenu dans cheStrlng |utllls4llon du 
Binary -decimal Conversion PaciLdge : StringToNum) 
I 

Vtr 

DumLmg : Longint; 
the In 1: : Integer; 
Begin 

fBttlngTDlntT-O; 

StrlnoToHbimltheSirlno.DiinlJXittl: 
the I nt : 'duiDLtTig ; 

fStringTolnt:=theInt; 

End; 



Puneclon fGetStrlnq|theID;Tnte^er) ;Stc!5b; 

I 

Wniroie le String present dans la resource STB d'ld 'thelD'. Sppel en 
Interne i la fonctlw GetSrlng {Utilities loolboi) 
1 

Vi! 



[)unSt[;StrJ55; 

DumS t F ing Kandle:StrlngE3dndle; 
Begin 

DkimStiinghlaidle^-Ge-.stringUhelD); 
DunStri-OuinStcingHanale""; 
tGetString: -OuinSC c; 
End; 

Procedure CeCFontStaielOnthePoct! GrafPtc; Var TheState; FontStace); 

Sauve-jacde dans 'theScate' les mtoniations OuidcDran sut rficntute de 
Cexte dans le port graphiqua 'OnThePorf (Le Type FontState est detini 
Oars I'en-tfta de la DNIT) . 

_ 1 

Begin 

With OnthaPotf, TtieState Do 
Begin 

fonti-txFont; 
tace:'t«race; 
nDde:-txHDde; 
3l!e;-tjtSiie; 

color ;-f9Color; 

End; 

End; 



Prtxsdure SeCFontState |Ont)H!port:CcafPtriTheState;FontEtate|; 



Hestaura, i partir des Infonnations OuickDraw sur Tferltuie de leme 
eonteniies dans 'theState' eelles du pore gtaphique 'OnlliePott ' . 

Begin 

Wllh OnthePort". The state Do 
Begin 

txFort:-tont; 
ExSlzer-size; 

f^olor^-calflr; 

CM: 

End: 
End, 
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Voici un logiciel de 
manipulation de caracteres 
sur Macintosh apportant 
une fonction cle qui 
manquait sur le marche de 
la PAO : la fabrication de 
titres et logos formes 
d'images simples et de 
texte. 

Pour deformer, lordre, courber dcs 
polices de caraciSres, il y a d6jS 
LetraSludio me direz-vous. Jc voiis 
arrcie de suite, car ces deux loglcicis 
n'ont absolument pas les memes 
fonctionnalil^ (ni les memes prix !). 
Avec TypeScyler, vous pouvcz donner 
une forme ^ une leltre, et I'appliquer 
sur toute la police, ei mc^me la 
m^moriser pour d'autres polices, par 
exemple loutes cellcs que vous avez 
dans votre systfeme, mais oui ! 

TypeStyler 1 .01 

Letire par lettre ou phrases enliercs el 
objcis graphiques de la biblioth&que 
interne peuvenl etre retravaiil6s avec 
les fonctions suivantes : 

✓ les caract^ms peuvent fitre remplis 
de 64 nuances de gris ; 

✓ 126 motifs modifiables en 256 
couleurs et remplissage gradu^ 

lin6aire ou radial, ou passage gradu6 
d'un motif k un autre (avec possibiliie 
de choisir les couleurs de ddbui et fin) ; 



✓ ombres projctccs tridimcnsionncl- 
Ics ou t^lescopiques, avec selec- 
tion de la source de lumitrc, de la 
couleur, du motif, des contours 
internes et exiemes, des d6grad6s avant 
ou arri&res ; 

✓ possibility d'£crire dcsiextes cir- 
culaires ^ditables scion n'importe 

quels diamfetres, types d'arc ou 
hauteurs ; 

✓ rolsiion destcxtes, symStrie, rd- 
giage d'approchc dcs mois et dcs 

Ictlres, d'inlcrligne, chevauchcmcni, 
arrifere et avant plans, aligncments ; 

✓ Pliage, compression, ctiremeni, 
rotation, torsion... 



TypcStylcr foncilonnc avec loulcs les 
imprimanles compatibles PostScript, 
toules les polices PostScript et Ics 
polices Adobe de type 1. II Iransfomie 
les polices ^ I'import en polices 

SmoothFont qu'il gere, puis les 
cxponc en PostScript. Vous pourrez 
importer vos dessins en format Pict ou 
EPS et exporter voire travail achcvd 
vers dcs applications icllcs que : 
PageMaker. QuarkXPress, Illustrator 
88, DrawingTable, etc. 

Brcf. avec lous scs raccourcis clavier, 
son interface au standard Macintosh, sa 
simplicity quasi-instinctive d'uti- 
lisaiion, TypeSlylcr fait un superbe 
complcmem pour les amateurs de PAO 
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bien faile. Seulement, il vous faudra 
elre un amateiir bicn ^quipd : c'csl vrai 
qu'il fonctionne sur lous Ics Mac Qt 




I'exception du 512), mais quelle 
lenteur torsque vous n'avez pas de 
Mac II ! Pour le MulLiFinder, offrez- 
vous un minimum dc 2Mo de Ram, 
sinon rien. II est h regreiter figalement 



I'obligauon d'ouvrir des fenfilres 
annexes pour chaque fonciion un peu 
sophisiiquSe. cela n'accdifere pas 
vraiment le travail. Pour vous faire 
paiienter, un adorable petil pinceau 
danse i I'fcran, en lan^anl des goul- 
telettes de peiniure parioui, cela 
collabore h la sympathie gfinfirale du 
logiciel, mais n'accilcre dvidemmcni 
rien. 



TypcStyler est distribufi en frangais par 
Soflmarl au prix de 3 550 F 1TC. 



En Bref : 
les dernieres houveautes d'Apple 



4 - -n « 



Apple France annonce la sorlie de 
deux imprimantes Laser : 

*^ la Personnal LaserWriter SC. 

possfidant un microprocesseur 
Motorola 68000 el IMo de me- 
moire vive, avec une resolution de 
300 points par pouce, elle 
n'accepte pas le PosEcripL 

Son prix: 15 300F. 

la Personal Laser-Writer NT, 

PosiScript ct partageable, 2Mo dc 
Ram exlensible ^ 8Mo, elle 
possfide 35 polices intcgrCcs. La 
NT comprend les Emulations HP 
LaserJet Plus el Diablo 630 pour 
I'imprcssion de documents non 
PosiScripL 

Son prix : 24 800 F. 



✓ Parallfelement, la LaserWriter SC 
disparatt du catalogue, tandis que 
le prix de la LaserWriter II NT 
baisse de 14% {33 100 F). ei celui 
de la II NTX descend de -8% 
(40 200 F). 

✓ Apple annonce Sgalcmeni la 
disponibilitd d' A/UX 2.0, nouvelle 
version du sysiSme Unix d'Apple. 
Ceite version apporte Ics 
avantagcs Mac k ceux qui 
travail lent sous Unix. 

Apple Computer France 

12, avenue dc I'Oc^anie 
Z.A. de CourtabcEuf 
91956 Les UUs Cedex. 
« (1)69 86 34 00 




A toute Vitesse... 

Dicotn Vision el Ing^nierie vient de 
presenter Wysicut, une machine de 
type fraiseuse Equipde sur ses irois 
axes de moieurs pas ^ pas. ContrSIEe 
directemeni par un Macintosh, elle est 
livnJ« avcc I'applicalion Dixie.Z, b&tie 
sur deux modules dislincts : 

✓ la preparation el le position- 
nement des contours it dd-coupcr ; 

✓ I'exdculion dc la commande 
dirccte en temps reel. 

Configuration minimale : Mac Plus ou 
Mac SE 2 Mo. 
Prixiipartir del24 530F. 

leom Vision e( Ingeniene 

6, avenue des Andes 
91956 LesUlis Cedex. 
w (1)64 46 07 11 



De toutes les 
couleurs... 

Apple pr^sente trois nouvelles 
cartes vid6o NuBus pour Mac 
modulaires : 

Carte video standard 4-8 : 

Fonctionne sur I'cnscmble des 
moniteurs Apple et permel d'af- 
ficher jusqu'a 256 couleurs ou 
niveaux de gris, Exlensible en 
8.24. 

Carte video etendue 8 24 : 

Un affichage de qualitiS photo- 
graphique sur I'ensemble des 
monilcurs de la gamme Apple 
pouvant aller jusqu'^ 16,7 
millions de couleurs. 

Carte \id6o accel^r^e 8-24 : 
Dispose de loulcs Ics fonction- 
naliiEs de la carte diendue 8.24 
et, de plus, acc6I6rc jusqu'^ 30 
fois la vitesse de tracS k I'ecran. 
Elle agit sur tous les moniteurs 
connect^s au mcme macintosh. 

L'utilisadon de ccs cartes requierl 
Ic systSme 6.0,5 et 2Mo de Ram 
pour les cartes 8-24. 

La carte Video 6iendue 8-24 est 
chez lous les revendeurs au prix 
(conseilie) de 5 000 F. Les autrcs 
carles seroni commer-cialis^es trfes 
prochainement. 
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J^rieCScSBan 



Beaucoup de rumeurs 
circulent concemant les 
nouveaux produits 
qu'Apple nous concocte 
dans le plus grand secret 
(sic). Una panic des 
annonces pourrait etre 
faite pour AppIeExpo. 

Pour I'insiant, tout ce dom on pcui 
Sire k peu prfes sur concernc Ics 
imprimantes (voir encadr^ dans ce 
num^ro). Face k un march6 qui se d6- 
chaine dans le domaine, en particulicr 
avec la DeskWriler de Hewrett- 
Packard, Apple ne peui rcster sans 
rdagir. faute de se voir ravir le quasi* 
monopole que la firmc de Cupertino 
avait su maintenir, surtoul grace ^ sa 
capacity d'ficrire des drivers satis- 
faisants. Mais les programmeurs ap- 
prenneni vite, et rares soni les choses 
^lablies plus de deux ans. Quoi qu'il 
en soil, ce sera de loutes fajons tout 
bon pour les consommateurs que nous 
sommes. 



Unites centrales 



En mati&re d'unit€s centrales, les 
nouveaux modfcles pr^vus soni au 
nombre de Irois, dont deux peut-etre 
pour ociobre. Le Mac Ilsi (?) canos- 
s6k\a Ilex, avec un 68030 i 20 Mhz, 
unc carte couleur 8 bits integr^e, un 
seul slot d'extension et un prix de 
I'ordre de 3 OOO $. Le Mac xo (?) 
dot6 d'un 68000 h 8 Mhz, sans 



connecieur d'extension est, lui, destine 
a remplacer pour I 500 S, le Mac 
Plus. Debut i991.devrait sortir le 
Mac Lc (?) disposani d'un 68020 k 
20 Mhz, et la couleur sur 4 bits, pour 
environ I 600 S. La sortie de ces 
produils devrail lirer les prix du resle 
de la gamme vers le bas ; il n'y plus 
qu'k attcndre... Quant au sysl£me 7, il 
existe, en version beta [res bugufie. La 
premiere version stable grand public 
devrait sortir en Janvier prochain. En 
attendant, les dcvcloppeurs planchent 
dessus, et j'ai pu apprccicr pour vous 
tout rdcemment ce que Claris nous 
concocte. 



Claris, 
toujours plus 



C'esi k Londrcs que Claris Prance 
m'a invitfi avec quelques conrrires de 
la prcsse Macintosh, pour assister k 
une conference de pressc sur les 
strategies logiciclles des prochaincs 
annees. D'un point de vue "philo- 
sophique", les prochains produits se 
voudront toujours plus simples d'uti- 
lisaiion et accessibles aux plus grand 
nombre. Grace a HypeiCard, unc £udc 
en iigne sera systemaiiqucmeni 
accessible pour tous les programmes 
de la gamme. Le travail en groupe sera 
privil6gi£ par I'accessibilil^ des 
fichiers en rfiseau, meme sans serveur 
dSdie, k I'instar de FileMaker II. 

L'cecumtSnisme total est rendu possible 
par la technologic XTND, sur laquelie 
Je vous avais promis un article mais 
qu'un manque de temps me fait 
reporter au prochain numdro. 



En bref cette lechnologie, proposde k 
I'ensemble du monde Mac, permet les 
Icctures/ecritures dans quasiment tous 
les Tormats de fichiers cxistant k ce 
jour. Vous vouiez faire un mailing 
sous MacWrite II, avec des donnces 
issues de dBase sur un PC, pas de 
problfemes XTND y pourvoit, et ce 
sans passer par AFE, ni par quelque 
procfidure complexe de traduction de 
fichiers. Les produits Claris soni et 
restcront pour le Mac (sauf Apple- 
Works bien sijr). Les 80 % de parts 
posscd^cs par Apple, doivent y etre 
pour quelque cbose, d'aulant plus que 
Ton retrouve dans la bouche de Yogen 
Dalai, son president, les mSmes 
apprdcialions sur Windows que 
Marylfene Delbourg Delphis, d'ACl 
(voir interview dans le meme nu- 
m^ro). 

Pour ce qui est des produils, outre 
I'annonce de ClarisCAD 2.0 et 
FileMaker Pro. nous avons pu 
rever sur ce que les programmeurs 
nous r^servent, grace au systeme 7, en 
particulier la communication inter- 
application ou lAC, dont je vous ai 
ddja longuemenl parld. La politique de 
Claris sera de dSvelopper au maxi- 
mum cette lAC, qui permetlra aux 
programmes de s'envoyer des mes- 
sages de commande, pluidt que de 
gonfler les fonctionnaliiSs de chaque 
logiciel. D'autre pan, Claris a achel£ 
une partie du moleur logiciel de 
Wingz, ce qui, k lerme. meilra la 3D 
dans MacDraw et FileMaker, ainsi que 
des fonctions de tableur dans Mac- 
Project et ClarisCAD. Nous avons pu 
assister k une fipousiouflanlc demons- 
tration, entre ClarisCAD el File- 
Maker. Imaginez le plan d'une maison 
fail sous CAD, dont chaque dlSment 
est notd et tarifd sous FileMaker. Vous 
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dupliquez un objet dans la maison, une 
table par exemple, celle-ci s'est aussi 
dupliqu^e dans la base et le devis 
global est aussitdt mis ^ Jour. 

Autre exemple : soit une carle de 
gtographie dans CAD, dont toutes les 
villes sont ddcriies dans FileMaker. 
Vous en sdlecuonnez quelques-unes sur 
la carte, la selection se fail auto- 
maiiquemenl dans la base de donnfes. 
De meme vous recherchez les villes de 
plus de lanl d'habitants dans la base, 
elles sont imm^diatemenl s^lec- 
tionnSes sur la carte. II faut le voir 
pour se rendre compte des perspecdves 
extraordinaires qu'ouvre cette com- 
munication entre applications. Le plus 
extraordinaire, c'est que ccla est 6gale- 
ment possible & travers un rfiseau ! 
Beaucoup de mes confrferes presents 
ont cru bon de rester impassibles et 
blasts. Peul-Stre ai-je gardd des yeux 
d'enfants en la matifere, mais je peux 
vous dire qu'un avenir relaiivement 
proche nous promei des merveilles. 
Pour clore la joumie, nous avons pu 
voir les nouvelles versions de 

ClofiaCAD ot do FileMaker. Jo vous 

parie de CtarisCAD un peu plus loin, 
et j'en profiierai pour vous toucher 
deux mots de la version 2,0 qui nous 
arrivera en septembre. 



Les imprimantes 
Hewlett-Packard 
partageables 



Je vous ai parl£ rdcemment de la 
DeskWriter. el je vous disais plus haul 
qu'elle dlail en uain de ravir le 
monopole d'Apple. De nouvelles 
fonciionnaliies vont la rendre encore 
plus attractive, et rclativement moins 
couteuse. Ddsormais, ceite impri- 
manle sera dotiSe en serie d'un connec- 
[eur AppleTalk, avec la possibilild 
pour les premiers acheteurs, d'une 
mise i jour. Mais ce n'cst pas tout. 
HP propose aussi sa irfes cdlfebre 
LaserJet, adaptfie pour le Mac. 
Intcprace LocalTalk, langage Post- 
Script sur cartouche. 2Mo de mimoire 
vive, la LaserJet III, se pose en 
concurrcnte directe de la NTX d'Apple, 
pour le prix de la NT. 



De plus, HP utilise pour cetie 
imprimame une technique de points 
variables, diminuant encore les effeu 
d'escalters, accrolssant ainsi la 
resolution apparente k I'impression. 
Visiblement HP a d&idfi de se tailler 
une bonne part du marchfi Macintosh, 
preuve que ce marchd est porieur, ei 
s'en donne les moyens. Au niveau du 
logiciel, ces imprimantes utiliseni 
directement les drivers standard 
d'Apple, gage d'une lotale compa- 
tibility. Je vous communiquerai les 
prix en France, dans le prochain nu- 
tnSro. En tons cas, ne vous prficipitez 
pas aujourd'hui pour acheter une Laser 
Apple, septembre va nous apporter de 
bien bonnes nouvelles. 



DataPack Mass 
Microsystems 



II y a quelqucs numfiros, j'avais fait 
une revue des nouveaux supports de 
donn£cs, ci en paniculici lea aysittncs 
de disques durs amovibles, consiruits 
autour d'une m&anique Syquest. Ce 
type de lecieur permet de disposer 
d'une capacity de siockage quasi- 
illimitfe en tranches de 45Mo. Comp- 
liment iddal pour les sauvegardes, ies 
graphislcs appr^cieront aussi ce moyen 
souple pour ranger des images par 
caldgories par exemple. Les Icctcurs de 
ce type se di^mocraliscnt, et Ton est S 
peu de chose prfes au mcme niveau de 
prix que ceux des USA. 

A cette occasion, un bref retour en 
arriere monurc combien les choscs ont 
changfi, surtoul au niveau des 
menialitis des imporialeurs/distri- 
bulcurs, el I'anicle que j'avais dcrit sur 
le prix des disques durs, il y a bicntoi 
deux ans. est aujourd'hui complfe- 
tcmenl diSpass^, el nous nc pouvons 
que nous en rcjoulr. 

Cette remarque faite, la soci^td 
Symbiotic, m'a permis de faire des 
tests plus approfondis sur le Data- 
Pack de Mass Microsystems, un 
des meilleurs apparcils de ce genre 
selon cerlaines revues amfiricaines. 
Carrossd pour servir de support S un 
Plus ou un SE, le disque amovible 




existe aussi aux dimensions Mac II 
lous modules. La carcasse est en 
m^lal, gage d'une solidity certaine . 

L'utilisaiion est on ne peut plus 
simple, une prise SCSI k connecter 
avec ceUe du Mac, un numdro de SCSI 
accessible par un sdlecteur (un peu 
nop facile d'accfes k mon sens), une 
prise de courant, et voilS la machine 
pr&te. Apr6s avoir glissfi la cartouche 
dans le lecteur, mis en marche et 
aitendu I'allumage du voyani vert de 
fonciionnemeni , on se retrouve avec 
un pyriphyrique reconnu comme un 
banal disque dur. 

Le temps d'acc&s est de 25 ms, soil un 
temps parmi les meilleurs. La 
duplication de lOMo prend moins de 
deux minutes. Au niveau de la flexi- 
bility, la cartouche est vue comme une 

groEse disquette, e( il eet possible de la 

changer en cours de session, k 
condition de la "d6monter" du bureau, 
d'yteindre I'appareil. mais pas forcd- 
ment le Mac. et de remonter la 
nouvelle cartouche grace k SCSI tools, 
cet accessoire de bureau permettani de 
meltre k jour une chaine SCSI. 
Accessoire que vous irouverez 
d'ailleurs sur la disqueite de ce mois. 
Des prycautions paniculicres devront 
eire prises lors de Tintroduction ou de 
rcjcclion d'une cartouche, loujours 
machine yteinte, sinon vous prendrez 
le risque de vous retrouver avec la tfite 
de lecture fusiliye. 

Au niveau logiciel, le DaiaPack est 
livry avec un utilitaire de formatage 
des cartouches, permettani de cryer des 
partitions, avec un yventuel mot de 
passe. Malgry tous mcs efforts je n'ai 
pu le metu-e en d6faui, De plus, une 
cartouche ne peut eire reformatye avec 
I'utilitaire Mass que si Ton connait le 
mot de passe de la cartouche s'il y en a 
un. Trfes (trop ?) bonne protection des 
donnfies. L'importateur offrant une 
mainlenance sur site en 48 heures, le 
produit a de quoi syduirc. Les car- 
touches sont bien entendu standard, et 
on commence k en trouver autour de 
800 F. Outre les 4 niygas de Share- 
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Ware ei Freeware sur la cartouche de 
base. Mass offre le logiciel SUM 11. 
Bref un produit trhs aUdchant par sa 
souplesse et scs performances. 



Modem 
LCE 124 P 



Hormis !a nouvelle version de Tops 
dont vous irouverez un banc d'essai 
complet dans ce m2me numdro. La 
Cotntnande Eleclronique nous a 
fait parvenir un modem sympathique. 
Au VL de remballage, je me suis 
d'abord dit : "ga y est, encore un dc ces 
trues finormes doni seuls les fran^ais 
ont le secret". Mais non, c'fiialt une 
fausse impression. C'est surtout le 
polystyrene expanse dc protection qui 
occupe la place. 

Le modem, lui. est tout petit, avec 

une carrosserie en m&lal de la meil- 

leure facture. de couleur plaiinium ; k 

I'avani, une fenStre allongSe avec six 

diodes tdmoin ; S i'arri^re, quaire 

cnnnecleurs : celuj de la liene 
connccteurs : celui de la ligne lele- 

phonique. deux RS 232, une en for- 
mat miniDin Mac, el une DB25 pour 
tout autre ordinateur. Egalemcni pre- 
sents, le connccteur d'alimcntation ex- 
teme (foumic) avec un petit Iransfor- 
mateur, I'interrupteur et un bouion 
reset, venant compliier le louL 

Une question : pourquoi quasiment 
tons les fabricants de modems 
persistent ^ mettre rintcrrupteur sur la 
face arrifire ? Tatonner ^ raveuglcite 
n'est amusant qu'un court instant et, k 
I'usage, tr^s faiiganL Sur la face inf^- 
rieure, un petit tableau d'inverseurs 
permet de configurer matdriellement le 
modem. Un dfitail hautement ergono- 
mique : le modem est livrfi avec deux 
rectangles de Velcro, qui autorisent une 
fixation amovible sur tout support et 
en particulier. sur une face lai6rale d'un 
Mac. Ces supports semblent insen- 
sibles k la tempdratuie. Une solution 



que Ton aimerait rencontrer plus sou- 
vent tani elle est ilfigante. Le capoi est 
maintenu par 4 vis, et que croyez-vous 
que je fis ? J'ouvris. L^ je suis tombS 
sur une carte filectronique d'une pro- 
piei& remarquable, sans le moindre 
strap de demifcrc minute. Les compo- 
sants m'ont paru de Irfes bonne facture. 
Bref un ensemble matdriel qui respire 
la quality 

Au niveau de I'utilisation, aucun 
problfeme de branchcment. C6i& 
l6l6phonc. une prise gigogne au 
standard fran^ais, et cdtd Mac, une 
miniDin. Le modem est livrS avec le 
logiciel LCE ComMac sign^ notrc 
ami J.-L. Bazanegue. Le 124P accepie 
les prolocoles V21, V22. V22 bis. et 
Miniicl ct jusqu'au 2400 baud full 
duplex. II rdpond au jeu de commandes 
Hayes permetiani, entre autres. 
I'automatisation totale des conne- 
xions. J'ai tests ce modem avec 
MacTell 3.6, LCE ComMac 2.0, 
AdressBook, AuioClock, en trans fcrt 
de Hchier avec un modem k distance, 
Dans les situations les plus courantes, 
il ne m'a pas €\& possible de le prendre 
en difaut. 

Quand on salt que son prix tournc 
autour des 3 000 F, on dispose ]k d'un 
uts bon rapport qualitd/prix. Je dois 
dire que nonobsiant deux points de 
detail -I'interrupteur dcvrait eire k 

U^llJJl — i HILL.! 1 a^LL'Ui UOViail VLiU u 

I'avant, et un bouton dc rdglage du 
haul parlcur serait le bicnvcnu, rcglagc 
qui peui se faire par logiciel- j'ai 
raremeni renconird un materiel qui 
respire d'cmblcc lanl la qualitfi. Mdriie 
19 pommcs sur 20. 



ClarisCAD 



Tous les madns. en accompagnant ma 
fille k I'Scole, je passe devant un 
bureau ou Ton pcul voir des des- 
sinateurs dc plans s'escrimer sur leur 
planche, les doigts dans I'encre de 
chine de leur Roiring. El tous les 
matins, je pense "les pauvres, s'ils 
savaient". Oui. s'ils savaient ce que 
Ton peut faire aujourd'hui avec un 
Mac et un logiciel de dessin indus- 
Iriel. Finies les gommes, les im- 
menses feuilles de papier millim6trfi 



dans lesquelles on s'emmele les 
pSdales. Finis les tracfis abrulissanls, 
le nez k cinq centim&tres de la pointe 
de son compas. Mais peut-£tre est-ce 
trop compliqufi d'utiliser ce genre de 
programme ? Et bien j'ai voulu en 
faire I'experience. 

Alio Claris, peut-on essayer Claris 
CAD s'il vous plait ? Quand je vous 
disais que les choses ont bien chang6. 
j'ai &i& saiisfait dans les quelques 
jours. 

N'dlant pas dessinateur moi-meme, 
j'ignorais par quel bout j'allais 
commencer. Ddballage du programme, 
et bonne surprise, outre deux manuels, 
une cassette video dtait comprise dans 
le package. Pas de Roland Garros ce 
jour ]k, j'ai done monopolist le ma- 
gnSioscope, lout le temps ndcessaire. 
Apr6s une bonne demi-heure d'une 
autoformation remarquable, j'ai pu 
passer aux choses sdrieuses. Et Ik, 
divine surprise, je me suis t&v6\6 fitre 
certainement aussi bon dessinateur que 
les malhcureux du bureau susnomm^. 

Pour schdmatiser ce qu'est Claris 

CAD, on pcul dire que c'est un super 

MacDraw. Le programme permet done 

de crder des objets vcctorisfis, mani- 

pulables dans tous les sens. Mais, en 

plus de la palette d'outils iradi- 

tionnelle pour creer cercles, carrds. 
iionneiie pour creer ccitics, uairiiSi. 

polygones et autres formes gdo- 

mStriques, on dispose d'outils plus 

specifiques dc DAO. 

C'est la que Ic Icrmc d'assislance prend 
toute sa valeur. 

Des outils modiUcaieurs permettent en 
complement des premiers, de repdrer le 
plus simplemeni du monde, sott une 
extrdmitd de segment, soit le centre 
d'un cercle ou d'un rectangle, de tracer 
des parallfeles ou encore des tangentes. 
Outre le trace S main levde, Claris 
CAD permet de rentrer dans une 
fcnctre sous forme de palette lloltante 
les dimensions exactes que doit avoir 
Tobjet sSlectionnfi. Vous voulez un 
cercle d'exactement 3,256 mm se 
situant k 25 cm du point zdro, rien de 
plus simple. En plus, cetie m§me 
fenetre vous reioume le pdrimfetre et la 
surface dudit objeL Pour afficher les 
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coles de eel objet, les ouiiis de coia- 
[ian aulomaiique vous fonl 5a dans le 
fonnat que vous voulez, en moins de 
lemps qu'il ne faul pour le dire. 

ClarisCAD, gr^ce k des options de 
replications d'une puissance remar- 
quable. vous pcrniel par exempie de 
crfier une roue denize en n'ayani 
dessinc qu'une seule deni. et specific 
combien on en voulail, sur un cercle. 

Je le rtSpfete, n'^tanl pas moi-mcme 
dessinateur indusiriel, il m'a €l& 
difficile de voir jusqu'oil Ton pouvaii 
allcr avcc ce produil. Cela dit, avcc un 
icl logiciel. I'aspect fastidieux du 
dessin s'efface complctement, afin de 
laisser la place S la cr6ativitiS. Et Dieu 
cr^a... 

A Londres, j'ai pu assister a une demo 
de ClarisCAD 2.0. Le produil a ete 
rendu encore plus facile d' utilisation. 
Claris prdtend avoir incorporfi dcs 
aspects d'iniclligcnce arlificiellc qui 
pcrmeitem, en quclque sorte, d'anii- 
ciper sur ce que le dessinateur veul 
faire. Je vous en rcparlerai aussi dcs 
disponibilitd du produil fini. 



HyperCard 2.0 ; il 
arrive 



Voila deux ans qu'HypcrCard est n€. 
Con^u ^ I'origine pour les Mac Plus 
et SE, beaucoup I'ont trouv6 irop 
limits. Des tonnes de XCMD et 
XFNC on I bien essayS de palier ses 
limitations sans jamais y parvenir 
compl^lemeni, surtout quant a la 
possibility de disposer de vraies 
fenetres pour I'affichage des cartf s. 

II a fallu des clones amSliords comme 
SuperCard et Plus, pour rcm&lier a ce 
deficit important. Mais voici les 
ameliorations apporlfies par la nou- 
veile version, tcltes que nous les 
pr6sente Apple Assistance : 
-* cartes de tailles variables ; 
H> multi-fenetiage ; 

veritable traiiement de texte dans 
les champs, avcc variation de 
styles ; 



H> support de rhypencxtc ; 

=s- ameliorations des impressions ; 

nouvelles commandes HyperTalk 
el XCMD. 

Le sysifeme 6.05 et les Roms d'au 
moins 128Ko seront n^ccssaires pour 
faire lourner cetie nouvelle mouture. 
Si les formats de fichiers seront dif- 
fcrents des versions pr^cWentes, un 
traductcur incorporiS fera la conversion. 

HyperCard 2,0 gcrcra des cartes jusqu'S 
1 280 X 1 280 pixels, toutes les cartes 
d'une mcmc pile devant avoir la meme 
taille. Cettc laille est modifiable par 
script ou manuellcmeuL 

Plusieurs piles peuvent £lre ouverles 
simultandmcnt, la limiie au nombre 
etanl la mdmoite disponible. II n'csl 
pas pour autanl possible d'ouvrir plu- 
sieurs cartes d'une meme pile. Les 
fcneires seront standard. 
Un menu "fonics" fail son appariiion. 
permettant de mixer les styles dans un 
meme champ, ces variations pouvant 
6tre aussi manipulees par script. 
D6sormais. le texte verrouilld d'un 
champ, se comporle comme un objct, 
et les fonctions ciickcext et 
cllckiine reiourncni la position du 
caract&re et de la ligne. Les impres- 
sions, poini faible des versions pi6c&- 
dentes, oni 6i6 complctement refon- 
dues. Ddsormais, les rapports pourronl 
etre sauvcgard^s individucllcmcnt, 
sous forme de fichiers sSpards. 

HyperTalk a 6l6 acc&l6r&, par un 
compilateur qui gencre du code en 
Ram, malhcurcuscmenl perdu lorsque 
Ton quittc le programme. De nomb- 
reuses commandes permctleni, bien 
sur, de manipuler la lotalilS des 
nouvelles fonctionnalilcs dicrites ci- 
dessus. Un test approfondi, aussi ir6s 
bicnioL 

Mais lout cela nc dit loujours ce que 
Ton peut faire avec. Et c'esl une autre 
histoire. 



PSN : Personnal 
Server Network 

Depuis le Mac Plus, crdcr un r6seau 
esi un jeu d'cnfant, Un simple fil 




tSlfiphonique. des pelils boitiers 
sp^ciaux, une imprimanie Laser el 
hop, lout le mondc voit la Laser par le 
sSlectcur, Mais riSseau, c'esl aussi 
iransferts de fichiers entre differents 
posies. Si diffdrentes solutions de tr6s 
bas niveau, comme Public Folder, oni 
pu resoudre les cas simples, d6s qu'il 
s'agit d'acc&lcr h dcs pariages rfels de 
volume, deux solutions : une lourde, 
signSe Apple avec AppleShare, n6- 
ccssitant un serveur dedie, ou I'auire, 
plus Icgcre, avec Tops. Mais si Tops 
paraii irSs s6duisant, surioul avec la 
version 3.0. il ne rivalise pas el de 
loin avec I'clcgance de rinterface 
d' Apples hare. 

C'est alors qu'Information Pre- 
sentation Technologie a choisi la 
combinaison des deux systfemcs, en 
integrant la notion de serveur non 
dedid utilisant I'inierface AppleShare. 
II en est n€ PSN. Ce programme fail 
de tout Mac un serveur sur un rSseau, 
doni les privileges d'accfes ei aulres 
definitions de groupes se font grace i 
un logiciel d 'administration rcprenant 
exactcmcnt les concepts d'AppleShare. 
PSN permel ainsi de dfefinir des 
privileges d'acccs meme au niveau des 
dossiers, el un dossier ct66 par un 
client n'esi pas dircciement accessible 
par I'utilisaieur du poste serveur. Les 
clients accfedeni au serveur par 
riniermediaire d'AppleShare-utili- 
sateur, livr^ avec le sysieme d'Apple. 
L' installation d'un serveur se fail de la 
manifere la plus simple qui soil : un 
clic sur un boulon. et fa marche. 

Les tests que j'en ai fait montrent une 
compatibililfi loiale avec les spe- 
cifications d'Apple, ei pour cause : 
pour pouvoir utiliser la panic client 
d'AppleShare, il faut quasimcni faire 
de I'AppleShare, Un gros probltme 
done pour ce produit (et pour Tops 
egalcmenl), le systfcmc 7 inclura les 
ressources de scrveurs non dfidiSs et ce, 
quasimeni gratuilemenl. Mais pour 
I'instani, le systSme 7 n'est pas encore 
disponible, et Dicu seul sait quand il 
le sera reellemeni. PSN est distribue 
par AlphaSyst^mes. 
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Les plus du mois 



JoIiWrite 3.02 



Jo!iVnte3.02 

La demiere version de JoIiWrite est 
de Benoit Wideman, auteur 
fran^ais. Ce traiiemcnt de texie est 
d'une qualilS et d'une puissance 
rcmarquables. II vous offre pour 250 
francs (prix du Shareware), ce que 
bcaucoup d'aulres ne font pas pour 10 
fois plus. D'une quality d'inlerface 
donl devraient s'inspirer les plus gros, 
c'esi Ic scul qui, insiall6 sur une dis- 
quetie 8OOK0 avec un systfeme mini- 
mum Mac Plus, laisse encore pr&s de 
2OOK0 pour travailler. avec tcllemeni 
de possibilit^s. Fabulcux ! 

Ces deux programmes en formal 
auiodccompaciable, oni 6t& reduits de 
taille par un nouveau compacteur, que 
je vous proposerai dans le prochain 
num^ro. 



TextPictureSaver, 
un driver pour 

imprimer 
differemment 



Ce fichicr, une fois place dans voire 
dossier sysi6me. est aciivable par Ic 
sSlecieur, comme un driver d'impres- 
sion. 




TextPictSaver 

Ce.lui-ci p^rmel da sauvegorder lout 

fichier k imprimer en format Texte ou 
Pici. Je vous proposerai le source dans 
le prochain numSro. 



GAID101 



Gatekeeper Aid 

Celte Init iraque et gu£rit du virus 
WDEF, qui se propage par simple 
insertion d'une disqueite infecife. Le 
virus se propageant par le fichier du 
bureau, nul besoin dc lancer une 
application atteinie pour le relrouver 
partout. Et s'il n'est pas k proprement 
parler volonlaircmcnt dangcreux, il 
provoque bombes et ralentissemenl 
fons dfisagrtSables. 



SCSI Probe 2.01 



SCSIProbe 

Ce CDEV, permet de montcr des 
disques durs, mcme lorsqu'ils n'etaicni 
pas en ligne au dSmarrage. Simple el 
cfficace. 



SynchroSet 




Syncbro-Set 



Un complement & AutoClocIc. qui 
permet de caler lous les Macs en 
reseau, sur le posle h I'heure. 



N AS A-R. Frequencies 



NASA-Radio Frequencies 
Pour les accros des scanners radio, 

tout^G loQ frjquencQD radio do la 

NASA, en formal texte. Cela vous 
permetlra de suivre ie prochain vol de 
la naveiie spaiiale. 



Solarian II 



Un extraordinaire jeu d'arcade en 
Shareware ! Solarian II est en cou- 
leurs el plein de tableaux, de fus&s, de 
bruits marrams, dans le style Space 
Invaders. Giga ! 11 n^cessite au 
minimum 2Mo de Ram et la couleur, 
I) n'^me pas Muliifinder. 



Les adresses 



Claris France 

41, rue Ybry, 922{X) Neuilly 
® (1)46 40 38 62 

Hewlett-Packard 

1 , avenue du Canada. 91940 Les Ulis 
® (1) 69 07 07 10 

La Commande Electronique 

La Mare ci Jouy - Douais 
27120 Pacy sur Eure 

Symbiotic 

4, rue Roberi Shumann 
94220 Charcmon 
® (1) 43 78 99 99 

Alpha Systemes 

43, chemin du Vieux Chene 

38240 Meylan 

® 76 4 1 84 30 

a 



Winfile, 

VOUS 

connaissez ? 

Du nouveau encore chez Winsoft. 
II s'agit de Winfile, un gestion- 
naire mulli-fichiers des plus 
puissant. 

D'ulilisalion simple, Winfile 

assure la gesiion complete de 

diffdrenis fichiers sur formal page, 

lisie ou mcme diiquelies. 

Un banc d'cssais dans le prochain 

numfiro. 

Prix public : 3 440 F TTC. 
Chez lous les revendeurs. 
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Sinderson 



La vie n'etant pas toujours un long 
fleuve tranquille, nbtre ami Jean- 
Yves Bourdin nous a quitte pour 
d'autres aventures informatiques. 



Changement 



Nous avions lous apprecie dans 
"Apple II For Ever" son style relax, 
ses bidouilles geniales, ses bons 
conseils. Surtout son talent pour 
ecrire ces articles-fleuve oil per^ait 
un humour latent releve d'un brin 
de narquoiserie, le tout baignant 
dans les eaux calmes d'une grande 
philosophie... 

Avec le depart de Jean- Yves, il m'a 
ete confie la lourde tache, non pas 
de le remplacer, mais d'assurer la 
continuite de ce qui fait 



I'importance de cette rubrique : 
1 'information. 

A changement d'auteur, chan- 
gement de titre. Changement de 
style aussi. J'esp^re que 
nous aurons plaisir, amis 
lecteurs, h nous retrouver 
ici chaque bimestre. Mais, 

sachez que cette rubrique 

est aussi la v6tre. Nous y 
parlerons de ce qui fait I'actualite 
de I'Applc II, tous modules 
confondus. Mais nous y rendrons 
compte egalement de vos 
decouvertes sur cette m^me 
actuality et de ce que vous voudrez 
bien nous dire el nous faire savoir 
sur tout ce qui fait notre passion 
commune : le monde de 1' Apple II, 
ce monde que j'appelle Apple- 
mania, version latine d'Apple- 
manie... 

N'hesitez pas ^ nous ecrire, nous 
sommesa I'ecoute... 



Le nouveau syst&me d'exploitation 
GS/OS version 5.0 -du moins sa 
mouture francisee- ne manque pas 
de laisser un certain nombre 

d'utilisateurs 

de GS assez 
perplexes. Oui 
ou non, faut-il 

I'acheter ? Oui 

ou non, faut-il = 
I'adopter ? 

Ma r^ponse est nelte : c'est oui, 
mais... 

Oui, car il est Evident que de plus 
en plus de logiciels vont &tre 
produits pour fonctionner sous ce 
syst^me d'exploitation afin de 
pouvolr faire appel k de nom- 



breuses ressources qui deviennent 
ainsi disponibios. Oui, car c'est le 
systtme d'exploitation de I'avenir, 
celui qui offre la fameuse interface 



GS/OS et disque dur 



graphique entre I'ordinateur et 
I'utilisateur. Oui encore, car le fail 
de dcmarrer en GS/OS n'empeche 
nullemenl de faire toumer I'Apple 
lIGS en mode 8 bits. 

Le meilleur exemple qu'on puisse 
faire est sans doute celui-ci : il est 
parfaitement possible, sous 



GS/OS, de demarrer AppleWorks 
version 1.4 (I'ancien), en cliquant 
sur son iconc qui apparait sur le 
bureau du finder, m&me si vous 
avez largement patch e cct 
AppleWorks ou si vous lui avez 
greffe tous les TimeOut dispo- 
nibles Chez Pom's, et il y en a ! Et 
quand on quitte ce logiciel, on est 
automatiquement renvoye au 
bureau du Finder, pret h lancer 
une autre application, qu'elle soil 
en 8 ou en 16 bits. 

11 est egalement possible de lancer 
un programme en Basic Applesoft, 
toujours en cliquant sur son icone, 
CS/OS se chargeant de lancer 
(launcher ?) tous les ingredients 
necessaires y compris Basic 
.System ! Et quand le programme 
Basic a fini son travail, deux 
possibilites s'offrenl h I'utilisateur ; 
rester sous Basic et lancer un autre 
programme, ce qui equivaut k 
rester en mode 8 bits. Ou bien 
retourner au finder de GS/OS, par 
la commande BYE. 

Mais cela, comme pour mille autre 
choses, tout le monde le salt sauf la 
foule moutonnifere de ceux qui ne 
savent pas... Pourtant c'est 
largement explique dans le manucl 
qui est remis avec GS/ OS. 

Les choses sont done parfaitement 
claires : GS/OS permet tous les 
travaux et est le syst&me 
d'exploitation taille sur mesure 
pour le GS. II nous offre un "Quit" 
vraiment utilisable pour peu que 
les concepteurs de logiciels et les 
developpeurs sachent respecter le 
protocole defini pour ce Quit. 
GS/OS va egalement dans le sens 
de la philosophie actuelle 
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qu'AppIe a defini pour ses ma- 
chines et qui est en vigueur depuis 
longtemps sur le Macintosh. Cette 
demarche est finalement apparue 
comme tellement naturelle que, 
preuve qu'Apple avait raison, 
meme la concurrence s'y met 
largement. 

Mais... il y a un petit "mais" 
I moderateur. Outre la capacite 
memoire necessaire au fonction- 
nement dc GS/OS qui provoque 



de grosses bouderies chez la 
clientele, il y a des exigences en 
mati&re de place disque ainsi que 
de bien nombreux fichicrs k gerer. 

En ce sens, le GS va desormais 
s'ecarler de ce S quoi on ^tait 
habitues et qui consistait k tra- 
vailler uniquement avec des 
lecteurs de disquettes, fussenl-ils 
des lecteurs 8OOK0. La solution qui 
devient une obligation, vous la 
connaissez ; c'est le disque dur. Si 



vous avez un GS, n'hesitez pas, 
equipez-le d'un disque dur. Non 
seulement vous ne reconnaTtrez 
plus votre GS mais vous vous 
demanderez pourquoi vous 
n'aviez pas achete cet accessoire 
plus tot. 

Enfin, n'oubliez pas de vous tailler 
votre GS/OS de travail sur mesure 
en fonction de vos besoins propres. 
Le programme "Installer" est fait 
pourga. 



Tourner sept fois plus vite 



On dit volontiers qu'en mati6re de 
perl^ormances, un disque dur va 
environ sept fois plus vite qu'une 
disquette. 

Ce n'est pas tout k fait faux, encore 
que cette appreciation est, 
evidemment, S relativiser en 
fonction de nombreux paramdtres ; 
le principal etant de savoir ce que 
fait I'ordinateur entre deux ordres 
de lecture du disque dur. Mais si 
on s'en tienl au flot de donnoes 
transitanl, en lecture et a un instant 
donne, entre le disque dur et la 
memoire, il est exact qu'il n'y a 
guiire de comparaison possible 
entre un lecleur de disquette, 
meme 8OOK0, et un disque dur. 

le ne suis eu&re de ccux qui sonl 

portes ^ faire des comparaisons sur 
les temps d'accfes, le delai 
rolationnel ou I'entrelacement. 
Etant, par nature, plutot porte sur 
la rapidite en utilisation pure, j'ai 
pourtant effectu§ quclques 
chronometrages sur mon GS, celui 
sur lequel je tape cet article. II est 
equipe d'un disque dur de 20 
megas. 

Booter GS/OS ne prend que 23 
secondes, montre en main, entre 
Taction sur les touches Pomme- 
Conlrol-Reset et I'affichage du 
catalogue principal sur le bureau 
du finder. II ne faut ensuite que 11 
secondes pour charger enli&rement 
AppleWorks 1.4 dans la carte 



memoire. Autant dire que je suis 
pret h travailler dans un bon delai. 

J'ai egalement sur mon disque dur 
une version de ce meme 
AppleWorks 1.4 largement greffee 
de TimeOut divers dont Ultra- 
Macros. Au demarrage, trois appli- 
cations se chargcnt enti&romenl en 
memoire ; Utilitaires, Paint et Su- 
perFonts. Eh bien, tout ce monde 
Irouvc sa place en m6moire en 18 
secondes exactement et laisse 
ensuite 798Ko libres sur le bureau ! 

Restait enfin ^ determiner le temps 
de chargement d'AppleWorks GS. 
Or on sail que ce temps depend dc 
beaucoup de choses, principa- 
lement de la configuration de 
demarraee qui a ete donnee au 

depart. Afin d'avoir une base de 
comparaison assez valable avec les 
precedents AppleWorks, j'ai 
puremenl et simplement opte pour 
un demarrage vide", c'esl-^-dire 
un demarrage qui me laisse ensuite 
le choix du fichier a ouvrir. Montre 
en main, un tel demarrage ne 
dcmande pas plus de 27 secondes. 

En conclusion, le duo de charme 
"GS/OS et disque dur" va donner 
un air nouvcau a votre GS et si le 
changement de vos habitudes est 
vraiment trop dur, vous avez 
loujours la pxassibilite de continuer 
It travailler en mode 8 bits et de 
venir ^ GS/OS petit k petit. Mais 
dans ces conditions, utilisez si 



possible un s^iecteur lors de vos 
travaux en 8 bits. ProSel par 
exemple. 

Le guide de 
I'AppIe II 

La troisi&me edition du Guide de 

I'AppIe II vient de sorlir de presse. 

Elle est datee du premier semcstre 

1990. Detail appreciable : elle est 

toujours diffusee au meme tarif : 

(zero) franc ! Ce Guide est 

maintenanl imprime dans un 

format nettemcnt plus pratique et 

qui est presque celui des livres 
qui pi^r^qLic i^tiiji iivit-j 

techniques Apple. II est enfin 

possible de ranger ce precieux 

Guide sur les m#mes rayons de sa 

bibliothfeque que les autres 

ouvrages de reference Apple. Et de 

le retrouver rapidement en cas de 

besoin. 

Ce manuel a ete encore amelior^ 
par rapport k I'edition prec6dente. 
On y parle des Apple User Groups. 
On y relrouve la section specifique 
aux transferts d'informations entre 
Apple II et Macintosh, mais mise 4 
jour. Une autre section, qui ne 
comporte pas moins de quatre- 
vingt pages, est consacree au 
diagnostic des eventuelles pannes 
sur Apple //e, //c et IIGS ainsi 
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que sur les lecteurs de disquettes 
associes S ces modfeles. Petit detail : 
les VAR (Value Added Reseller - en 
frarn;ais, Revendeur k Valeur 
Ajoutfe) apparaissent maintenanl 
avant les revendeurs agrees. 
Quand je dis "les VAR" j'exagfere 
un petit peu puisqu'il n'y en a 
qu'un : Brejoux. 

Lecteurs, procurez-vous ce Guide, 
c'est veritablement un instrument 
de travail et mcme d'etude. Selon 
les statistiques donnees dans la 
preface de ce guide, la derni&re 
edition a cte diffusee k 13 000 
exemplaires. 81 % de ses lecteurs 
I'ont trouvee utile ou indis- 
pensable et la note moyenne qui 
lui a etc attribuee est de 7,6 sur 10. 
Ceci montre, s'il en etait besoin, 
que Ic monde de I'Apple 11 est 
loujours tr6s vivace et sait se 
montrer critique, pertinent et 
constructif si besoin. Ceci montre 
aussi, quoiqu'on en dise, qu' Apple 
continue k faire des efforts pour 
consorver le contact avec ceux qui 
ont fait le succ^s de ses premiferes 



machines. Enfin, un petit travail 
vous est demand^ : celui de 
repondre au questionnaire qui se 
trouve ei la fin du Guide. II 
permettra k I'Apple II Service 
Team de mieux connaitre vos 
desirs et de mieux repondre k 
votre attente pour la prochaine 
edition du Guide. Pour vous 
remercier, I'Apple II Service Team 
meltra votre adresse de c6le pour 
vous envoyer cette prochaine 
edition sans que vous ayez k la 
demander. 

Rappelons que ce Guide peut etre 
obtcnu chcz les concessionnaires 
Apple ou sur simple demande k 
Apple France, soit par courrier, soit 
en telephonant au (1) 69 86 37 00, 
soit via le Minitol sur le 3616 code 
APPLEA. 

Rappelons enfin que ce Guide est 
toujours gratuit. Dorenavant, un 
Applemaniaque qui n'aura pas son 
Guide sera comme un cow-boy qui 
n'aurait pas son cheval : il n'aura 
aucune excuse. 



n 



e c 
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C'est la nouvelle formule que nos 
amis anglo-saxons viennent de 
decouvrir avec une reference non 
dissimulee k un grand savant. 
Cette nouvelle formule signifie 



I = mc^ 



approximativemcnt en bon 
anglais : Information Technology = 
Media x Computers x Commu- 
nication. 

Elle veut se rapporter k ce qui fait 
la tendance de notre ^poque : 
I'ordinateur, meme micro, dovient 
toujours plus un instrument qui 
tend k r^aliser la jonction entre 
information et communication, un 
moyen de Iraiter un peu de tout : 
donnees, sons, images, echanges 
de messages... Nos micros sont en 
passe de devenir des "processcurs 
modiatiqucs". 



L'in^tuctable evolution du GS, 
comme celle de son frfere le 
Macintosh, s'oriente dans ce sens. 
Tout le monde, ou presque, com- 
mence k s'cloigncr de I'ecran texte 
et de ses 24 lignes de 
= 80 colonnes. Je crains 
que ce dernier ne 
risque de perdre sa 
suprematie plus tot 

que prevu, L'avenir 

c'est de plus en plus 
le graphisme, le moyen d'afficher k 
I'ecran tout et n'importe quoi. II est 
probable qu'on poussera les 
exigences k vouloir passer en un 
rien de temps d'une circulaire en 
frangais k la scannerisation d'un 
document en Sanskrit, k I'affichage 
de la photo de Laurence ou k la 
preparation d'un dazibao chinois ! 

II reste k savoir si cette ^norme 
puissance logicielle sera necessaire 
au niveau de la bureautique quand 
de frequents travaux se limitent ci 
du Iraitemcnt de texte, mais cela 
est vraiment une autre histoire. 



Les nouvelles versions du systdme 
d'exploitation de I'Apple IIGS qui 
se sont succedees un peu rapid- 
ement ces derniers temps, 
semblent ne rien faire d'autre 
qu'aller dans le sens de la tendance 
actuelle. Tous les constructeurs 
veulent avoir, k present, une inter- 
face graphique entre I'ordinateur et 
I'utilisateur, chose qui existe chez 
Apple depuis Lisa. 

Quant k nous, si nous Irouvons 
encore nos graphismcs un peu 
lents ou les besoins en memoire un 
peu exageres, montrons-nous pa- 
tients. II reste aux chercheurs et 
ing^-nieurs k concevoir et mettre 
au point des microprocesseurs plus 
rapides, des drivers capables de 
tenir la cadence et des supports 
pouvanl contenir tout ce qu'on 
voudra y mettre. Nous en sommes, 
de ce point de vue, un peu dans la 
situation de nos premiers Europlus 
qui n'avaient pas tout k fait les 
minuscules ni les caractferes 
accentues du moins au debut. Qui 
accepterait, de nos jours, de 
travailler avec AppleWriter en 40 
colonnes et des disquettes 140Ko ? 

Le formidable enjeu repr^sente par 
le nouveau pouvoir mediatique du 
micro-ordinateur va probablement 
apparaltre dans les prochaines 
annecs. Je garde confiance, nous 
serons certainement dans le coup 
avec nos GS qui approchent 
facilement, grace k HyperStudio 
par exemple, le concept "Hyper- 
Media" Cher k Apple. Mais 
^voluons et sachons accueillir les 
nouveaux syst^mes d'exploitation, 
les logiciels qui vont avec, les 
ameliorations k ces logiciels et... 
les ameliorations aux amelio- 
rations. S'ils ont des bugs (bon 
d'accord, je conc&de que ce n'est 
pas forc^ment inevitable...), s'ils 
ont des bugs, done, vous pouvez 
essayer d'en trouver et de les 
signaler k Pom's. 
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Chasseurs de bugs 



A propos de bu^, il fut un temps 
oil existaient de veritables 
chasseurs de bugs. Ces §tres 
etranges et un peu mercenaires 
n'attendaient qu'une chose dans le 
fonctionnement d'un logiciel : qu'il 
se plante ou plante la "machine". 
Et quand ^a arrivait, c'etait parti 
pour loute la nuit ou tout le week- 
end. II ^tail alors interdit de 
deranger le chasseur. Malheur h 
rcpouse qui se risquait k rappeler 
I'heure des repas ou k signaler 
qu'on etait lundi matin. Le 
chasseur de bugs, tout occupe a 
traquer la bete n'avait plus aucune 
notion ni du boire (encore que 
quelques bi^^res, en ete...), ni du 
manger, ru du dormir. 



Adules de certains diffuseurs de 
logiciels qui n'h^silaient pas ^ leur 
confier des pr^versions de leurs 
produits, avec mission de passer 
au crible tous les cas de figures 
possibles, ils elaient trailes de lous 
les noms d'oiseaux par d'autres. 
L'avtnement des professionnels du 
logiciel et des societes specialisees 
en la matifere a porle un coup fatal 
h cette race des chasseurs de bugs 
qui semble aujourd'hui bien 
eteinte, Est-ce k dire que nos 
logiciels sont desormais pa rf aits et 
qu'ils tournent rond ? Hum ! ]e 
suis porte a croire qu'il reste encore 
du gibicr pour les bons chasseurs. 
Mais comme je viens de le dire : 
cette race semble bien eteinte. 



n est des manifestations qui 
demandent du temps pour etre 
preparees. C'est probablement le 
cas d' Apple Expo et tres surement 
de la version 1990 qui aura lieu au 
CNIT de La Defense du 19 , 
au 22 septembre prochain, 
Je ne sais pas si les clients 
Apple et les futurs 
visiteurs ont le droit de 
soumettre quelques idees 

en la matitre, surtout qu'en 

ce moment, tout ou 
presque doit etre dej^ decide, mais 
rien n'empeche de s'exprimer et 
j'ai decide de le faire. Une 
precision prealable : ce que je vais 
dire conceme uniquement I'Apple 
IIGS. Les Appleliens non GSsistes 
-ils ont tort- sont neammoins 
cordialement autorises k me lire. 

Mon souhait serait qu'Apple 
reserve une surface faisanl k peu 
prfes le quart de I'un des niveaux 
de I'Apple Expo de I'an dernier. Ce 
serait trfes bien, par exemple, au 
fond du ler niveau, \h oii tr6nait, 
I'an dernier, le Macintosh portable. 
On ferait un espace tr&s degag^ et 
on I'appellerait "universpace GS". 
On disposerait, de place en place 
de grands plans de travail de 



forme heplagonale -parce que i;a a 
un cote de plus que I'hexagone- ou 
rappelant la coupe transversale 
d'une pomme de haut en bas. Ces 
plans de travail seraient en 



Un peu avant 
I'Expo 



agglomere melamine, de couleur 
blanc casse, supporlcs par des 
treteaux tubulaires laques 
platinium. Dessus il y aurait de 
nombreux GS. 

La plupart seraient k la disposition 
des visiteurs qui pourraient s'y 
initier ou essayer les logiciels 
qu'on nous annonce souvent mais 
qu'on ne voit pas toujours, qu'on 
ne peut gu^re essayer ou juger 
chez les revendeurs Apple et 
autres concessionnaires "parce 
qu'il faut le commander mais 
seulement si vous I'achetez"... A 
certains endroits de 'Tuniverspace 
GS", soigneusement reparlis selon 
la loi des intervalles du marketing 
scienlifique, on installerait des GS 



inaccessibles, poses sur des homes 
interactives et faisant tourner sans 
arret, pour les badauds et pour 
ceux qui en sont rest^s au Color 
Graphic Adapter, un superbe 
programme d'animation gra- 
phique ! 

Vers le milieu de I'espace il y aurait 
une estrade assez haute, meublee 
d'une grande table et de chaises. 
De temps en temps quelqu'un 
d'imporlant viendrail s'asseoir k la 
grande table, entoure d'un 
aeropage de disciples, et viendrait 
dire k la foulc ce qu'il pense du GS, 
comment et pourquoi il I'utilise et, 
surtout, ce qu'il fait avec... Les 
visiteurs pourraient ainsi ecouter, 
dans le desordre : Gian Carlo 
Zanni, Jean-Louis Gassce, Emile 
Schwarz, Hcrve Thiriez, Jean- 
Marie Bresard, Madeleine Hode, 
Jean- Yves Bourdin, Sebastien 
Sisombat, Henri Lamiraux, 
Christian Piard, Yvan Kcenig, 
Nicole Breaud-Fouliquen, Marcelle 
Godefroid (pour les dames) el 
m&me des americains : Alan Bird, 
Rupert Lissner, Glen Bredon, les 
Beagle brothers, Roger Wagner.., 
Bien entendu, cette liste n'est ni 
limitative, ni exhaustive. 

Peut-^tre ce genre d'animation 
aurait-elle le don de nous faire 
redecouvrir un certain esprit Apple 
que les nouvelles machines, 
Macintosh comprls, n'arrivent pas 
vraiment ci nous faire retrouver... 



Apple 
(re)met le 
bas 



Le march^ de la micro-infor- 
matique professionnelle serait, 
parait-il, en passe de se saturer 
dans un proche avenir. Ce n'est pas 
moi qui le pretend mais les faits 
qui le montrent. 

Plusieurs constructeurs desireux 
de gagner de nouveaux marches 
sont en train de definir une 
strategie destin^e k investir la 
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micro dite "domestique", c'est c» 
dire de placer des ordinaleurs dans 
les foyers fran^ais. II y aurait, £i 
Boca-Raton en Floride, des 
ingenieurs qui gardent un souvenir 
amer de I'echec cuisant, en 1983, 
d'un certain "junior" et qui 
aimeraient bien prendre Icur 
revanche. 

L'un des problfemes, sinon le plus 
ardu qui est k surmonter, consiste 
justement k donner aux micros, 
futurs "domestiques", la convi- 
vialite et la facilite de mise en 
ceuvre necessaire pour un usage 
relativement facile. 

Or, cette convivialite, cette facility 
de mise en ceuvre que tous recher- 



C'est John Sculley, president 
d' Apple Computer, qui I'a dit : les 
baisses de prix qui etaient 
pratiquces, depuis queiques mois 
dc)h, principalement sur la gamme 
Macintosh sont ter-mi-nees. Ces 
"prix casscs" etaient destines, selon 
Apple, k rcprendre des parts de 
marche. 

Ces fameuses parts de marche 
sont-elles reprises ? John Sculley 
n'a pas fait beau coup de 
confidences. En ce qui conceme le 
GS, rien d'important n'a fillre. On 
ne connait pas beaucoup I'impor- 
tance des ventes mais on est sur 
qu'il s'en vend. Des magazines 
americains n'hesitent pas k 
protendre qu'il s'en est vendu plus 
d'un million. Et quand on 
qucstionne Apple sur ses 
intentions concernant le GS on 
s'attire invariablement la mome 
reponse : "Apple continuera a 
vcndre I'Apple II aussi longtemps 
qu'il y aura des clients qui 
voudront I'acheter. . .» 

Ce qui en langage financier 
signifie, tout simplement, 
qu'AppIe gagne de I'argent avec le 
GS. . . mais se garde bien de le dire. 



chent, cela n'existe-t-il pas, dej^, 
sur nos GS ? On pourrait croire 
qu' Apple, voulant viser le creneau 
de la nnicro domestique, se mette k 
definir une strategic basee sur un 
renforcement du potentiel du GS et 
de sa diffusion. Au dire des 
augures qui se flattont d'Otre au 
courant de ce qui se trame k 
Cupertino, ce n'est pas du tout 
ainsi que I'etat major commercial 
d' Apple voit les choses. On attend 
plutot un Macintosh d'entree de 
gamme dont le prix ne saurait 
dcpasser les 1 000 dollars aux 
Etats-Unis. A ce niveau, les micros 
domestiques pourraient etre alors 
definis comme des produits 
electroniqucs "de grand public" au 
meme litre que les magnctoscopes. 



Apple sail aussi que si les futurs 
micros domestiques ressemblent k 
ce qu'on a connu i! y a queiques 
annees, le GS promet d'avoir de 
magnifiqucs moments devant lui. 

Apple 
retro 90 

Qu'on me permctte d'exprimer un 
dernier souhait a propos de I'Expo 
90 : il faudrait faire revenir la 
retrospective des machines Apple 
vue k I'Expo 89. Mais en la 
completant par des documents 
d'epoque, un montage audiovisuel, 
des demonstrations de logiciels 
d'autrcfois, comme des logiciels 
bureau tiques (Apple Writer, 
Multiplan, PFS, QuickFile...) des 
utilitaires (Locksmith, Bag of 
Tricks, Dakin, Nibble...) des jcux 
(Hard Hat Man, Roach Hotel, 
Braintcaser Bid, Penny Arcade...) 
des langages (Applesoft, Pascal, 
Procode, Cobol avec carte Z80...) 
et meme, pourquoi pas, le celfebre 
Canapple ! 



les camescopes ou les chaines hi-fi 
par exemple. 

Le GS ne sera done pas un produit 
d'electronique grand public et c'est 
peut-§tre tanl mieux. On ne sail 
que trop oti passent ces appareils 
dont la gadgetisation le dispute 
souvent au clinquant. Nos GS 
resteront de vraies machines, de 
vrais micros capables d'effectuer 
les Iravaux que nous leurs 
dcmanderons, de prendre la 
configuration que nous leurs 
donneront, de nous procurer le 
plaisir de les programmer 
veritablement... Celui qui ach&te 
un GS aujourd'hui s'en servira 
encore dans dix ans. MSme si 
certains se demandont si le GS sera 
toujours 1^ dans deux ans. 



Materiel 



Le dernier "Apple TI for ever" vous 
I'avait annonc6 : le disque dur 
monte k mdme la carte d'interface 
est desormais accessible k tous 
ccux qui ont un Apple 11. II est 
egalement disponible en France. 11 
s'agit du disque "InSyder" de 
Cirtech. 11 n'existe, pour I'instant, 
qu'en deux capacites : 20 et 40 
megas. 

Mais "Apple 11 for ever" n'a pas dit 
tout ce que pretend la docu- 
mentation de rinSyder, a savoir 
que ce disque peut aussi 
fonctionner sous d'autres systtmes 
d 'exploitation que GS/OS ! Ce qui 
signifie qu'il peut done §tre plac^ 
dans un des slots d'un Apple //e 
et, sans doute, d'un Europlus 
tournant encore avec DOS 3.3 ! 
Amis applemaniaques, si vous 
avez de vieux fichiers DOS 3.3 que 
vous n'avez jamais repris parce 
que trop gros, I'lnSyder pout etre la 
solution... 

Quant k considerer ce disque dur 
comme un disque amovible 
pouvant aller de GS en GS, mon 
avis iTt^s personnel est que ce point 
de vue peut ^tre partage dans la 
mesure oii il s'agirait de "voyages" 



On ne casse plus 
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tr&s peu frequents. Pas particu- 
liferemenl pour la sante du disque 
lui-m&me s'il voyage conforta- 
blemcnt. Mais par egard pour les 
contacts des slots des GS ainsi mis 
k contribution. 

Neammoins, la tcchnologie 
actuelle autorisant des perfor- 
mances toujours plus elevees, j'ai 
eu connaissance d'un prototype de 
disque dur amovible mis au point 
par la firme americaine Disk 
Technologies Corp. Sur ce disque 
dur, tout est enferme dans un 
boUier, meme la carte controleur 
qui s'enfiche dans un connccteur 
special quand on introduit le 
disque dans son logement. Le 
boitier lui-m&me n'est pas plus 
grand qu'un jeu de tarots, parait-il. 
Voici done un vrai module de 
disque dur amovible que vous 
pouvez cmmener dans voire 

poche, votre travail fini, afin 
d'empficher les petits curieux de 

mettre leur nez dans vos fichiers. 

Pour le moment, ce disque ne se 
branche pas sur les Apple. Et teste 
un prototype parmi d'aulres. Quel 
dommage ! 

Apple 
formule 1 

Non, ne revez pas ! Ne vous 
precipitez pas sur les circuits pour 
applaudir une quelconque voiture 
de course qu'Apple se mettrait k 
sponsoriser. Ne croyez pas non 
plus qu'un de nos champions 
automobile ait decide de mettre un 
Apple dans son moteur pour gcrcr 

sa eensemmatien dg earbufant, m 

un driver dans son volant pour 
ameliorer sa conduite. 

Foin de tout cela. Si vous passez 
sur I'autoroute dite "du Sud", k un 
endroit bien precis, vous 
consfaterez I'existence d'un h6tel a 
I'enseigne de "Formule 1". Tout a 
fait banal, me direz-vous ! Oui 
mais... D'abord ces hotels sont 



ger^s de fagon trfes automatis^e. 
Les portes des chambres, par 
exemple n'ont pas de cle : elles ont 
toutcs une serrure digicod6e. Le 
code etant generalement etabli et 
distribue par micro-ordinateur, 
vous commcncez h comprendre ? 
VoiU, vous avez compris : la 
gestion de I'hotel en question est 
assuree par un Apple ! Ce qui fait 
fremir de plaisir les apple- 
maniaques de passage, surlout 
quand ils apergoivent le mod&le 
Apple en service. Lk, ce n'est plus 
du frisson, c'esl le nirvana assure 



Respirez ! 



Le dernier num(5ro dc Pom's, en 

rubrique Apple II For Ever, page 
66, parlait de spirom&tre, cet 

appareil qui sert k controlcr la 

capacite respiratoire d'un sujot. 

Cette information nous a valu un 

courrier de la societe L. Martin 

Medical, developpeuse du "Spi- 

romatic", premier spirom6tre 

informatis^ -ce sont eux qui le 

disent- k avoir vu le jour ct qui se 

trouve pilote par un... Apple IIGS ! 

Selon eux, revolution de la gamme 
Apple II fait que, non sculcment 
leur appareil est I'un des plus 
performants du marche et que 
cette pretention est facilemont 
diJmontrable, mais encore que cette 
meme evolution leur a pcrmis de 
mettre en ceuvre des examens 
medicaux plus pousstJs par 
diffusion d 'helium dans les 
poumons. 

L. Martin Medical ticnt encore k 

— que la premi&re version de 
leur Spiromatic fut commer- 
cialisce en 1982 et fonction- 
nait deja sous le controle d'un 
Euro plus ; 

— qu'ils sont abonncs k la revue 
Pom's depuis quatre ans dcj^ 
el que cela les a aides dans 
leurtache de developpement. 



pour certains... Devinez quel 
mod&le de micro ^tait en service 
quand je suis passe ? Non, ce 
n'etait pas un Mac. Pas davantage 
un GS. M6me pas un //e ! Vous 
n'allez pas me croire et pourtant 
c'est vrai : 11 s'agissail ni plus ni 
moins que d'un vieil et increvable 
Europlus fonctionnant en mode 40 
colonnes avec disquettes 5,25" de 
140Ko... 

Pourquoi faire complique et 
coutcux quand on peut faire 
simple et pas cher ! 



Couleurs 



Les GSsistes avaient deja le 

"clavier bien tempore". 11 ne leur 
manque plus que le clavier bien 

colore. C'est nouvcau, c'est joli, ga 

personnalise k la maison et ga 

"customize" au travail. Ce sont de 

petits capots en plastique de toules 

les couleurs que I'on place par 

dessus les touches de son clavier 

dont le gris un peu monotone, 

fagon platinium, n'est vraiment 

pas congu pour jeter des notes 

vives dans Tcnvironncment 

Applelien... Ces petits capots 

portent, bien sur, I'inscription de la 

touche d'origine mais, raffinemcnl 

supreme, ils peuvent meme &tre 

imprimcs selon vos specifications. 

Le fabricant, Hooleon Corp, fait sa 
pub en se basant sur les claviers 
des compatibles de qui vous savcz, 
mais il an nonce aussi qu'il dispose 
de ce qu'il faut pour d'autres 
modelcs de claviers. Je ne lui ai pas 
demande s'il en a pour le GS mais 

je guig aggez porte k le penser. Une 

nouvelle mode est lancee ; le 
clavier en couleur. 

Lira-t-on bientfit, pour demarrer 
un logiciel, des instructions du 
genre : appuyer sur la touche verte 
et tout en la tenant enfonc^e, 
pressez la touche bleue. Ceci fait, 
tapez la touche rouge et lorsque 
vous avez le curseur violet sur 
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Les TimeOuts pour 
AppleWorks 3.0 
arrivent... 

Plusieurs TimeOuts pour 
AppleWorks 3.0 soni dores et 
disponibles. Adaptfis t la 
version frangaise par Daniel 
Lurot, ils soni regroup6s en 
deux disquettes. 

Comme nous vous I'avions 
annoncfi, les possesseurs de la 
version 1.4 pourront biSn^ficier 
d'un tarif dc mise ^ jour. 

La premiere de ces disquettes 
comprend ; 

✓ ExtraFonts (ColorFonis et 
EdiFonts) ; 

✓ SuperFonts ; 

✓ TO.Paint. 
Les prix : 



fond magenta avec bordure k petits 
pois roses, tapez RUN en 
caract^res blancs avec les touches 
de couleur orange... 



Superclocfe 



Seiko vienl de fabriquer et de 
mctlre en vente une montre bien 
particuli^re. Elle est dotee d'une 
memoire pouvant enregistrer, 
d'aprfes le constructeur, 80 ecrans 
de donnees provenant de logiciels 
divers el notamment de piles 
HyperCard. Et, probablcment done, 
d'Hyperstudio. La liaison avec 
I'ordinaleur fournisseur de 
donnees se fait par un cable 
special. 

Enfin, et accessoirement, il faut 
noter que cette montre pas comme 
les autres est egalement capable de 
dormer I'heure. 

Le plus 
grand des 
premiers 

La societe Amdahl, qui construit 
de tr&s gros ordinateurs, possMe 
dans son centre de recherches de 
Sunnyvale (Californie) des 
chercheurs qui savent utiliser leurs 
loisirs. 

En travaillant uniquement le soir et 
les week-ends, six d'entre eux onl 
mis un an k calculer le plus grand 
des nombres premiers ! Et sont 
enlres, du meme coup, dans le 
livre Guiness des records. Us n'ont 
pas donne leur fameux nombre 
mais ont indique qu'il failait plus 
de soixcinte-cinq mille chiffres pour 
I'^crire. 

Les developF>ements de la theorie 
des nombres, qu'ils ont travailles ^ 



cette occasion grSre ti de nouveaux 
algorithmes, serviront ensuite, 
parait-il, k la mise au point 
d'applications avanc^es pour la 
conception de nouveaux ordina- 
teurs. Nous esperons qu' Apple est 
au courant. 



Motorola 



II parait que Motorola a I'intention 
de construire une nouvelle usine. 
Le site en serait dej4 trouve : 
Easter-Inch en Ecosse ! Je ne sais 
pas si les capitaux sont egalement 
trouv^s mais on avance comme 
montant possible pour les inves- 
tissements k la fois necessaires et 
envisages la somme rondelette de 
TOO millions de livres sterling. 

Certains penseront qu'avec tout ^a, 
Motorola devrait disposer d'un 
outil modeme et adapte tant k la 
mise au point qu'^ la production 
de nouveaux microprocesseurs. 
Avec, peut-etre, un mod&le base 
sur la plate-forme du 68000 et 
permettant de realiser un nouveau 
GS, compatible, non seulement 
avec I'actuel, mais aussi avec le 
Macintosh... 

Eh bien, pas du toul ! La nouvelle 
usine est puroment et simplement 
deslinee a produire des equi- 
pemenls numoriques pour les 
abonnes au nouveau systeme de 
telephone celiulaire pan-europeen 
"GSM". Ce sera d'ailteurs la 
troisidme unite de production en la 
mati&re. 

William Mensch, le concepteur du 
65816 qui pretend disposer de 
versions capables de tourner k 12 
Mhz, a encore du travail en per- 
spective et peut garder quelques 
espoirs de convaincre retat-major 
de Cupertino... 




version complete : 800 F 

tarif Joker : 720 F 

Mise a jour: 300 F 

tarif Joker ; 270 F 

La seconde disquette rfunit : 

✓ TO.Graph; 

✓ TO-Paint. 

Leg prix : 

version complile : 850 F 

tarif Joker : 765 F 

Mise a jour: 300 F 

tarif Joker: 270 F 

Pour biJneficier du tarif mise a 
jour, Toriginal de la disqucite 
TimeOut 1.4 doit gtre rctoum^ h 
Pom's en mSme temps que 
voire commande. 

La remise S jour des autres 
TimeOuts sera disponible trfes 
prochainemcnt, ainsi que de 
nouveaitx TimeOuts dont nous 
vous parlerons dans le prochain 
numSro. 

a 
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Pom's Le Tarif 



Revues 

n" Skn" 26, chacime 
n" 27 i n" 49, chacune 

Recueils Pom's 

Ces recueils regroupent 4 numeros 
de la revue. (Recueil 5^8 epuise) 

Recueils nM d 4, g d 1 2, chacun 



40,00 
45,00 



140,00 



Cables communication 

Se reporter aux numeros 27, 28, 30, 
31, 33 el 34 qui presentenl les 
programmes de communication 
reliant ordinateur et Minitel. Pre- 
ciserle ou les modHesd'ordinatcur. 



cable Minitel/ordinateur 
CSbte Ordinateur/ordinateur 

Reliures 

Pour la protection et le dassement 
de 6 numeros de Pom's (un an) 
Rellure 



225,00 
225,00 



75,00 



Disquettes Pom's, Macintosh 

Ces disquettes regroupient I'ensem- 
ble dcs programmes pour Macin- 
tosh d'unc revue, + desprogrammes 
du domaine public, polices de 
caract?;ros, nouveaux syst&mes, etc. 

3,5", de la n" 16 d la n" 49, chacune 



80.00 



Disquettes Pom's, Apple // 

Ces disquettes regroupent I'en- 
scmble dcs programmes pour 
Apple / / d'une revue. 

g,9§" U8K8. dg l§ RM 1 1§ fis 49. £fi§cufie 88,08 
3,5" 8OOK0, de la n' 29 k la n" 49 chacune 80,00 

Disquettes Com. V1.0 

Ensemble de deux disquettes 

ddcrites dans Pom's n" 48. 1 00,00 

Shareware Apple // 

Presentees dans les n° 38, 39, 41, 42, 43, 44, 46 & 47. 

DPA 001 d 039, 140 OU 8OOK0, Chacune 100,00 

* le numero entre parentheses indique la revue dans 
iaquelle le produit est d^crit. 



Logiciels pour Apple // 

Ces logiciels sont accompagncs d'unc documentation 
fran^aise. Tarif Joker* Tarif normal 



Fontasm (47) 


450.00 


500,00 


ChessMaster GS 8OOK0 (39) 


630,00 


700,00 


ProCommand 


450,00 


500,00 


Arlequin 140Ko (39) 


135,00 


150,00 


Copy ][+ version 8.3 (37) 


450,00 


500,00 


ProSel (36) 


450.00 


500,00 


Compilateur Beagle (35) 


675,00 


750,00 


BigU140Ko (35) 


400,00 


450,00 


Pom_Unk 3.1 (34/35) 


400,00 


450,00 


lnterPom's2.0 (31) 


540,00 


600,00 


Clv_Pom's (31) 


180.00 


200,00 


EPE 5.1 (15/23) 


180,00 


200,00 



Logiciels pour AppleWorks 1.4 



} 



Ces logiciels dotent AppleWorks de la souris, de polices 
de caractferes etc. Tarif Joker* Tarif normal 

TimeOut ReporlWriter (45) 
ExtraFonts (43) 
TimeOut PowerPack (41) 
TimeOut FileMaster (41 ) 
TimeOut SpreadTools (41) 
Macro Tools (41) 
MacroTools II (44) 
TimeOut DeskTools I (41) 
TimeOut DeskTools II (44) 
TimeOut Paint(39) 
TimeOut SuperFonts (38) 
TimeOut UltraMacros (38)" 
TimeOut Graph (38) 
TimeOut SideSpread (38) 
PathFinder (38) 

Logiciels pour AppleWorks 3.0 

rransisatign ftpp!gWQrK§ 3;Q 

+ UltraMacros 970,00 1 070,00 

Idem, en ^change de la version 1 .4 650,00 720,00 

ExtraFont, SuperFonts, TO.Paint 720.00 800,00 

Mise A jour 270,00 300,00 

To.Graphet TO.Paint 765,00 800,00 

Mise S jour 270,00 300,00 

Polices de caracteres 

De type Macintosh, elles fonctionnent avec AppleWorks, 
SuperFontset, Publish it! et MultiScribe. Une trentaine de 
polices par disquette. 

'Polices' 001 d 018, 140 ou 8OOK0, chacune 100,00 
Catalogue de r^f^rence Unipol 80,00 



720,00 


600,00 


450,00 


500,00 


675,00 


750,00 


495,00 


550.00 


270,00 


300,00 


270,00 


300,00 


495,00 


550.00 


495,00 


550,00 


270,00 


300,00 


720,00 


800,00 


585,00 


650.00 


765,00 


850,00 


495,00 


550,00 


135.00 


150,00 
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78000 Versailles 
T616phone:(l)39 51 24 43 
Serveur:a)39 53 04 40 
Fax: CD 39 49 54 65 



Logiciel pour IBM PC 

* Accompagne le livre 'Les Secrets de 

Multiplan' de H. Thiriez 

Les Secrets de Muliiplan' 

InterPonTs 540.00 



175,00 
600,00 



Logiciels pour Macintosh 

Tarif Joker* Tarif normal 
1 600,00 1 780,00 



DiagramMaker 
DiagramMaker - D6mo (46) 
Sargon 4 (40) 
Excel Efficace 
MacAstuces 
Le Livre du Macintosh 
Copy 11 Mac version 7.2 (37) 
Pom_Unk 3.1 (34/35) 
InterPom's 2.0 (31) 
Clv_Pom's (31) 
Raccourci (26) 



540,00 



450,00 
400,00 
540,00 
180.00 
180,00 



80,00 
600,00 
175,00 
200,00 
200,00 
500,00 
450,00 
600,00 
200,00 
200,00 



Shareware Macintosh 



Disqucttcs presentees dans les numeros 22, 30 et 45. 

Mac A, B. C, D, E, F, G, H, I, J chacune 100,00 

Abonnements 1 an (6 numeros) 

* L'abonnement ^ la revue Pom's comprcnd 
I'attribution automatique de la carte 'Joker'. 
Cclle-ci offre un acc&s privilegie k une 
assistance telephonique et donne droit aux 
remises sur les produits Pom's. 

Revue seule 225,00 

Revue et disquettes Apple // 140Ko 625,00 

Revue et disquettes Apple // 8OOK0 625,00 

Revue et disquettes Macintosh 625,00 

Revue et disquettes Apple // 140KO et Mac 1 025,00 

Revue et disquettes Apple // 8OOK0 et Mac 1 025,00 



Gagnez du temps. Commandez par 
Minitel au : 

(1) 39 53 04 40 



Bon de cx>mmande 



Je desire recevoir : 

Quani. Produit 



Prix total 



J'ai un lecteur Apple / / 140Ko □ 
)'ai un lecteur Apple / / 8OOK0 □ 
Montant 

Port avion hors CEE 

15,00 Fpar revue et/ou disquette 

Montant total 



Pour I'achat de quatre disquettes DPA ou Polices de 
caractferes, une cinquitme de votre choix vous est offerte. 



Je r&gle Cheque 

par : Carte Bleue/Visa/Eurocard/Mastercard 

Numero 

Expiration / 

Signature 



Nom 

Prenom 

Adiesse 



n" de carte Joker 
n*" de telephone 
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Vends carte Eitenlion mimoire IMo pour 
Apple IKJS : 1 000 F. 

Giselk Pemauil 

» 42 60 38 64- posit J 149 

Vends ImageWritcr II + manuel d'origine + 
cibic de liaison MacinLoEh + papier lifting + 
rubans noir et blanc & couleur : 4 000 F ctai 
neuf, 
Philippe 

■ (1)394951 15(ripondeur) 

Vends cane Apple IIGS 1 Mo : 900 F. 

Dimiiri Geyslor 
w 50 44 21 70 

Vends TBM/PS 2, noddle 8530 021, 
mSmiHre 640Ko + disquc dur 20Mo + dcran 
couleur + claviei 102 T IBM (azeriy) + 
Joystick ttvec carle souris IBM + imprimanic 
Epson 1050 LQ 132 colonnes. 24 aiguilles, 
traitemcnt de lexte Sprint de Borland : 
19 000 F le louL 

Daniel Foucaull 

» (1)39 51 03 57 (domicile) 

• (1)3024 64 62 (heures bureau) 

Vends cSble de liaison Apple //e-Image- 
Writer : 100 F — Cane Super Serie : 400 F. 
Cane 80 colonnes : 50 F — Kit 6502 //e 
conqilcl : 250 F. 
Guy Tambianfca 
SO 56 20 65 

Vends carte exiendon mcmoiie Apple OGS 
CRom 01 ou 03) 1,2 megas : 1 500 F — 
ImageWriter 1. uis bon elai : 1 500 F. 

Hervi Lemoine 

w (1)42 47 04 23 (le soir) 

Vends carte RamApple IMo d'origine pour 
An>le IlGS : 1 000 F- 

Ren£ Border 
« 5t 40 98 19 

Vends Apple //c l28Ko + moniteur & 
support + Lecteur extcme 5,25" + souris + 
imprimanie Scribe sept couleuxs : 5 900 F. 

tr 94 78 43 25 

Vends Apple //c 128Ko + cane Checlcniale 
512Kq + moniteur monochrome + 2 lecteurs 
3,5" + joystick + cable pirilel/Minitel : 
5 500 F le touL 

Chrislian Schwoerer 

Sfi 20 00 82 (heures bureau) 

Vends Macintosh SE/30 avec Ram 4Mo el 
disquc dur interne 40Mo. 

Vends Macintosh portable. 

Henri Largouet 

V 9741 77 10 (heures repas) 




CoUaboraletir de la rcvuc Pom's cause achai 
Macintosh 11 vend Madnlosh SE 2.5Mo + 
disque dur 20 M6gas -<- Lecteur exteme 
aOOKo + softs + ImageWriter II : 20 000 F 
te tout. 

* 39 51 24 43 (heures bureau) 

Recherche pour Apple //e une cane Epson 
Interface imprimante RX30 (compatible 
AppleWorks). 

Michel Lecuyer 
tr 35 71 32 67 

Vends Apple //e 256Ko. 80 colonnes, 
disquc dur 5Mo + interface scric parallile : 
3 000 F — Acccleraicur ZipChip : 1 500 F, 

Harris Brizard 

■B (J) 64 91 31 29 



Vends Apple //c 384Ko ctcndu a 1 133Ko, 
souris + joysdcfc + moniicur & sac assort! + 
1 lecteur 5,25" + un moniteur couleur 
conncnion Minitel : 7 500 F. 

Dominique Fiorenlin 
(1)47 06 49 81 

Vends 1 Iccicur Apple 5.25" : 1 000 F — 
1 joystick Apple : 200 F — ■ 1 cane mimoire 
pcrmanenie IMo Ram Spcedisk : 2 500 F 
— AppleWorks : 500 F — Notcs'n'Files : 
500 F — Deluxe Paint II ; 500 F — Flight 
Simulatoi II : 200 F — Sundog : !00 F 
Pegasus : 100 F — 12 disquctles Vcrbadm 
3,5" 25. 2D : 150 F — 16 disqucltcs 
Verbatim 5.25"25.2D : 150 F. 

Main L. Dubois 
22, avenue de CUchy 
75018 Paris 



Horirori^alement 

1 - Bis pour les floneurs 

2 - Hommes o principes 

3 - Fir* de U t-letromanie - Pas avec 

4 - Elide elide - N'est dene pas a poil ! 

5 - Filets - Salut derinitif 

6 - Qui a un air penche 

7 - Estompe - Pronom familier 
B - Seeulier - Negalif - 

Son homme n'a rien de particulier 
9-11 pense o lui - Done vis 
10 - Direction - Etoile de terre 

Vertiealemenl 



1 - Barbes 

2 - Salon de beaute I 

3 - Agacement 

4 - Cap d'Espagne - 

Slav* sans coeur - 
Tete de palriarche 

5 - Sur le Tech - 

Ce ne sant pas des auberges 
espagnoles ! 

6 - Ne s'est done pas ennuye - 

lis se mettent en cartouche 

7 - Jamais absente - Con jonction 

8 - Sort* de botte 

9 - Prenom - Occire 
1 - Sans personne 
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Parce que les 
besoins de chacun 
sont varies k rinfini, 
il n'y a pas de police 
de caract&res 
universelle. 

Tour a tour, il faudra etre 
OFFiciEL, joumalistique, 
personnel, simple, facile a 
lire, original et sobre, intime, 
concis... 



FONTASM 2.0 



JlJlllSf 

iivlLin 



Mais comment, dans chaque 
police, satisfaire le matheux et ses 
asymptotes le germanophile fi, 
le fana de Mishima ¥ et meme 
I'amoureux v des jeux 4> ? 

Avec FoNTASM, vous creez votre 
police de caracteres et vous 
adaptez les polices existantes. 
Aujourd'hui, AppleWorks GS, 
MultiScribe GS, DeLuxe Paint, 
PamtWorks Gold ou encore 

Publish-It produisent des 
documents de qualite, encore 
faut-il, dans la police choisie, 
disposer de tous les caracteres 
souhaites 

{%o,jif,f,!, o, f), 

dimensionnes comme 
il convient... 



DE STEPHAN HADINGER 




(3 fidlitr Eflilion foil! Hodificolicn! 
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Le GS merite des 
caracteres de qualite, 
FoNTASM vous les offre 
avec facilite. 



GF63tl8R d§ pelieoi I paRiF a§ = Msdifisaiion dg tsuti p8ll6§ GS c8fRpatibl§ 

Multiscribe GS, AppleWorks GS, DeluxePainl, PaintWorks Gold, Publish-It — Dessin 
et Edition des caracteres avec des outils de type Paint : point, gomme, iigne, rectangle, 
cercle, decalage... — Effets de relief, ombre, gras, anii-gras, souiigne, miroir... — 
Transformation directe d'une pariie d'image graptiique en caracidre — Modification de 
tous les paramfetres de la police — Copier/coller de tout ou partie de caractere — 
Dimensions des caracteres : jusqu'^ 128 x 128 points — Programme frangais, 
totalement compatible GS/OS, livre sur un disque 3.5", transferable sur disque dur. 

Foniasm est une exclusivite d'Edilions tiflev-Pom's, 12, rue d'Anjou, 78000 Versailles 
® (1) 39 51 24 43 — fJlinilel (1) 39 53 04 40 

—500,00 F TTC, tarif Jocker abonn6 450,00 F— 



Editions MEV 
12, rue d'Anjou 
78000 Versailles 
© (1) 39 51 24 43 
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DiagramMaker™ 

DiagramMaker est un logiciel de dessin vectoris^ et de gestion de 
texte sp6cialis6 dans la production de dessins et de documents 
graphiques de grande quality. Son interface trfes conviviale rend 
facile la creation et la mise a jour de diagrammes, de plannings, 
d'organigrammes, d'ordinogrammes et de transparents. 

DiagramMaker est aujourd'hui I'outil le plus efBcace pour la 
creation de documents graphiques structures. H est aussi bien 
utilise par des gestionnaires et des planificateurs, dans le monde 
de I'entreprise, que par des analystes et sp^cialistes syst&me dans 
le monde informatique, ou par les enseignants et les 6tudiants 
dans le monde de I'education. 

DiagramMaker respecte totalement I'ergonomie Macintosh : 
annulation de la demiere operation, multifenetrage, couleurs, 
motifs, polices et styles, copier/coller inter-application, defilement 
automatique des fenetres. 

Ses outils de puissance et de convivialite : 

Une palette personnalisable Affichage personnalisable 



L'utilisateur cr^e ses propres outils de 
dessins et les ajoute h la palette. Les 
palettes peuvent etre sauvegard^es et 
relues k volenti. 

Integration du texte 

A cheque objet est associ^e une zone de 
texte justifiee ; les cadrages sont entie- 
rement r^glables. 

Les connexions 
entre objets 

Pour connecter deux objets, il suffit de 
tirer la souris du premier vers le second, 
la liaison sera un trait droit ou courbe, 
avec ou sans fleche. 

Les liens entre objets 

On peut lier deux objets (leur donner une 
r^Krence commune), y compris entre 
deux documents diff^rents. 

Des arborescenees 
immediates 

Transformation immediate et auto- 
matique d'un texte avec indentation en 
un arbre structure. 

Edition de fond 

Sur chaque page d'un document, on peut 
d^finir des elements de fond, qui seront 
alors visibles ou non, et partageables 
entre plusieurs pages. 



11 est possible d'afficher un document 
dans de nombreuses tailles, depuis un 
fort zoom jusqu'6 la vue dans la 
fenetre d'une page ou du document 
tout entier. 

Et d'autres 
fonctions encore... 

Non seulement il est possible 
d'aligner des objets les uns par 
rapport aux autres, mais aussi de les 
centrer par rapport k la page ou au 
document, et d'obtenir des espa- 
cements r^guliers entre les objets. 



r 



DiagramMaker existe en version 
de demonstration comprenant 
une version bridge du programme 
et une pile HyperCard d^crivant 

son mode demploi §t fermant un? 

assistance en ligne (sous Multi- 
Finder ou avec HyperDA). 



DiagramMaker d6mo : 80,00 F 
(remboursables en cas d'achat) 
• 

DiagramMaker 1 780,00 FTTC 
Tarifabonn^ 1 600,00 F 

Licences de site : nous consulter 



